00100	********* MSS ***************   3/4/76
00200	
00300	***PROGRAMS TO EDIT MUSIC ON DISPLAY AND PRINT IT ON XGP OR CALCOMP ***
00400	
00500	THIS SERIES OF PROGRAMS IS THE PROPERTY OF LELAND SMITH, PROFESSOR OF MUSIC
00600	AT STANFORD UNIVERSITY.  IT MAY NOT BE USED OR COPIED WITHOUT HIS PERMISSION.
00700	
00800	TO RUN: TYPE 'R MS'      (SEE LAST PAGE FOR 'RPG' FILES.)
00900			(FOR THE PROGRAM TO RUN IT MUST PICK UP SOME SPECIAL
01000			DATA IN [DAT,LCS].)
01100	
01200	 <<<<<< SOME GENERAL ADVICE:  'SAVE' THE WORK OFTEN.(SEE PG.6)
01300	
01400		PUT IN ALL NOTES, CLEFS, BEAMS, ETC.(ALL THE THINGS PUT IN
01500		WITH 'SCORE' INPUT) FIRST.  THEN DO ALL 'JUSTIFYING'(PG.8)
01600		OF LINES, IF NEEDED, BEFORE ADDING OTHER WORDS, NUMBERS,
01700		ETC. (THE PROGRAM WILL RUN FASTER AND YOU WILL HAVE THE
01800		FINAL POSITIONS OF THE NOTES DISPLAYED.)
01900	
02000		SEE SECTION ON 'SCORE' INPUT (PG.9)  FOR FIRST STEPS IN INPUT.
02100	
02200	HORIZANTAL SPACING IS ON A SCALE OF 0 TO 200.(SEE END OF PG.5)
02300	
02400	VERTICAL SPACING IS BY NOTE LEVEL NUMBERS.  THE POSITION OF MIDDLE  C
02500	IN  THE  TREBLE  CLEF IS TAKEN AS 1. D=2, G=5, C ABOVE=8, G ABOVE=12,
02600	ETC.  THE B BELOW MIDDLE  C  =0,  A=-1,  G=-2,  ETC.   THUS  VERTICAL
02700	POSITIONS  UP  FROM  MIDDLE C MAY BE THOUGHT OF AS THE NUMBERS OF THE
02800	DIATONIC INTERVALS FROM C. (HOWEVER THIS DOES NOT FOLLOW  WHEN  GOING
02900	DOWN FROM MIDDLE C.)
03000	
03100	
03200	THE CODE NUMBERS:			ROUGH INDEX:  THE 'PAGE' NUMS.
03300	
03400	1 - NOTES				CODE NUMS.	2,3,4,5
03500	2 - RESTS				LETTERS, WORDS(T) 6
03600	3 - CLEFS, DYNAMICS			VARIOUS COMMANDS  7
03700	4 - LINES, BOXES, DASHES		XGP INFO.	  7
03800						Z,P,G,S,AD, ETC.  7
03900	5 - SLURS, BRACKETS			EDIT MODES	  8
04000	6 - BEAMS				MOVE, COPY, ETC.  8
04100	7 - TRILL, PEDALS, OTTAVA		DP, JUSTIFY, ETC. 8
04200	8 - STAFF				IN, READ (INPUT)  9
04300	9 - MISC.				AUTO. SPACING	 10
04400	10 - NUMBERS
04500	11 - LIBRARY				SUBROUTINE LIST  11
04600	12 - CIRCLES				RPG LIST	 12
04700	16 - LETTERS (T=text)
04800	17 - KEY SIG.
04900	18 - METER
05000	101 - SPACING SCALE
05100	
05200	
05300	
05400	
05500	
05600	
05700	
05800	
05900	
06000	
06100	
06200	
06300	*** SUMMARY OF LETTER COMMANDS ***
06400	
06500	G name=GET name			RS name=RESTART AND GET name
06600	SA name=SAVE name		SB name=SAVE WITH DPY, name
06700	SM =SAVE WITH SAME NAME DPY	GM name=GET FILE name AND ADD TO DPY.
06800	
06900	IN n,n,n... 	= INPUT ON STAFF n, etc.
07000	READ name n 	= READ SOS FILE name AND PUT IT ON STAFF n.
07100	T n,n...	= TYPE IN WORDS, LETTERS, n = STAFF n, ETC.
07200	Z n,n,n 	= ZOOM LENS TO SIZE n, ETC.
07300	P n,n... 	=PRINT CURRENT VAL. OF PARAM n, OR LIST OF ITEMS n→n.
07400	SP n 		= SET SPACING STAFF NUMBER TO n.
07500	AD n,n 		= ADJUST STEMS TO MEET BEAMS ON STAFF n, ETC.
07600	SH		= SHOW SHAPES OF TYPE FONTS BEING DISPLAYED.
07700	SHX		= (EXIT) GO BACK TO 'PRIMATIVE' UPPER CASE ONLY.
07800	SHP		= SHOW ALL IN 'PRIM' FONT (UPPER AND LOWER CASE).
07900	
08000	M = MOVE A GROUP OF ITEMS
08100	C = COPY A GROUP OF ITEMS
08200	A = ALTER THE PARAMETERS OF A GROUP OF ITEMS
08300	ST n,n = EDIT ON STAFF n CODE NUMBER n.
08400	ED n,n,n = EDIT AT HORIZ. POS. n, ON STAFF n, CODE NUM. n.
08500	L,R,U,D n = LEFT, RIGHT, UP, DOWN n NOTCHES.
08600	I n = EDIT ITEM NUMBER n.
08700	S = SET; THEN A = ALIGN.
08800	LP = LIGHT PEN
08900	DP n,n,... = MAKE DISAPPEAR STAVES n,n...
09000	J = JUSTIFY A LINE.
     

00100	******* KEY TO THE PARAMETER NUMBERS *******
00200	
00300	P1=CODE NUMBER, P2=STAFF NUMBER,
00400	   P3=HORIZANTAL POSITION, P4=VERTICAL POSITION BY NOTE NUMBER,
00500	       P5=OFTEN 2ND VERTICAL POS., P6=OFTEN 2ND HORIZANTAL POS.
00600	
00700		THE FOLLOWING CODE NUMBERS ARE USED MAINLY FOR EDITING.
00800	--------  SECTION I  ---------
00900	
01000	1 NOTES: 1, STAFF, POS, NOTE NUM(VERT. POS.),  
01100		(P5) STEM DIR & ACCI,
01200		(P6) FILLED IN? (≥0), DECIS REFER TO ACCENTS, ETC.
01300		(P7)NUM OF TAILS(1=8TH,4=64TH, ETC.)
01400			(IF 2 DIGITS, LFT IS NUM OF DOTS.)
01500		(P8)STEM EXT. BY NT NUM.  (999 IS SAME AS 0 HERE.)
01600		(P9)=-1 TO SUPPRESS LEDGER LINES.
01700	        	 (P9 ALSO STORES RHYTHMIC VALUE FOR SPACING.)
01800		(P10)=1 PUTS SLASH ON GRACE-NOTE TAIL (1000 IN P8=SAME)
01900	        (P11)=CHANGE SOURCE POS. OF STEM. (USE WITH P4=400+)
02000	
02100	    P4 100S GIVE MINIS, 200S GIVE DIAMOND SHAPE (HARMONICS)
02200		300S GIVE 'X' NOTES (FOR PERCUSSION, ETC.), 400S=NO NOTE HEAD.
02300		500S GET EARLY MUSIC PACKAGE (SEE EARLY.F4 FOR INFO).
02400		+1000 PUTS NOTE ON STAFF ABOVE CURRENT ONE, +2000 ON STF BELOW.
02500	
02600	    FOR P5: <10= NO STEM, 10-15=STEM UP, 20-25= STEM DOWN
02700		1,11 OR 21=FLAT; 2,12,22=#; 3,13,23=NATURAL; 4=DBL b; 5=DBL #
02800	
02900	    FOR P6: POS NUM OR 0 = BLACK NOTE, ANY NEG NUM = WHITE NOTE.
03000	    FOR P6: 10,-10 'HOMES' TO RIGHT OF UPWARD STEM.
03100		     20,-20 'HOMES' TO LEFT OF DOWNWARD STEM.
03200	 	30,-30(FOR 0,-1) PUTS DOTS IN PROPER PLACE IN COMPLEX CHORDS.
03300	
03400	      IF P7 HAS 2 DIGITS THE NOTE IS DOTTED; 2ND DIG. IS NUM OF TAILS.
03500			IF 2ND DIGIT IS 1 AND P6 IS NEG. A WHOLE NOTE PRINTS.
03600				IF 2ND DIGIT IS 2 A DOUBLE WHOLE NOTE PRINTS.
03700		DECIMALS AFTER P5 OR P7 SPACE OUT ACCIDENTAL OR DOT.
03800		DECIMALS AFTER P6 ARE ACCENT NUMS (.4-.7,.9 ETC. SEE CODE #9)
03900				UP TO 2 ACCENTS CAN BE PUT IN THIS WAY.
04000	
04100	
04200	
04300	2 RESTS: 2, STF, POS, HGT, P5=REST(-2=WHOLE, -3=DOUBLE WHOLE, 
04350			-1=HALF, 0=1/4, 1=1/8,ETC.  -4=REPEAT SIGN  [./.]) 
04400	
04500		P6) 1=DOTTED,  P7) HOLDS RHYTHMIC VALUE. (1=QTR, .5=EIGHTH, ETC.)
04600			P8=NUMBER OF MEASURES REST(TO 999).  THE REST WILL ALWAYS
04700			   TURN INTO A WHOLE REST.  A HORIZANTAL LINE WILL DISPLAY
04800			   BELOW THE REST TO FACILITATE CENTERING BETWEEN 2 BAR 
04900			   LINES.  TO CHANGE THE WIDTH OF THIS CENTERING LINE 
05000			   ALTER P6.
05100			     (IF P6=0 THE LINE WILL EXTEND ABOUT 10 UNITS IN EACH
05200			     DIRECTION.  A NON-ZERO ENTRY WILL CHANGE THIS.)
05300			P8=-1 GIVES WHOLE REST WITHOUT NUMBER ABOVE.
05400	
05500			   P8=-2 WILL CENTER WHOLE REST BETWEEN 2 BAR LINES IF
05600			   THEY ARE IN THE EXACT ORDER BAR-REST-BAR.   IF THIS IS
05700			   NOT THE CASE THE REST MUST BE CENTERED VISUALLY. USE P6.
05800	
05900	
06000	
06100	
06200	
06300	
06400	
06500	3 CLEFS, DYNAMICS AND OTHER THINGS:
06600		  3, STAFF, POS, P4=HGT CHANGE(TO MAKE SOP. ETC.),P5=CLEF NUM
06700		  P6-P9 (SAME AS IN CODE 9)
06800	
06900		(CLEF NUMS ARE: TREB=0, BASS=1, ALTO=2, TENOR=3,
07000	         4=PF.STF BRKT.(SEE CODE 4 ALSO.)   5=ARROW
07100	     10=b, 11=#, 12=NAT., 13=bb, 14=x,15=half note,16=whole note.
07200		 ADD 100 TO P5 FOR MINICLEFS.)  (P6-P9 AS IN CODE 11.)
07300	
07400	  OTHER THINGS: P5=40 = PPP   41 = PP   42 = P   43 = MP 
07500			   50 = MF    51 = F    52 = FF   53 = FFF 
07600			   70 = CRESC.  71 = SUBITO  72 = POCO
07700			   80 = ACCEL.  81 = MENO    82 = DIM.
07800			   30 = ED      31=MORDANT   37=RIT.
07900			   33 = CURVY BRACKET 	44 = HEAVY WEDGE 
08000			   61 = SEGNO   62 = TURN
08100		 ---- MORE WILL BE ADDED! ---(FILES CLEF0,1,2,4,5,7,8 ARE FULL)
08200	
08300	
08400		***** EARLY MUSIC ITEMS (SEE APPENDIX RE. 'EXTRA')******
08500	
08600	  C CLEF=26, F CLEF=27, END-OF-LINE WIGGLE=28
08700	
08800		20-25, 29 = EARLY MUSIC NOTATION (USE THESE IN P6 OF 'NOTES')
08900			20=MAXIMA, 21=LONGA, 22=BREVIS	23=SEMIBREVIS
09000		   24=MINIM, 25=SEMIMINIM, 29=INVERTED LONGA (FOR LIGATURES)
     

00100	
00200	
00300	
00400	
00500	
00600	
00700	
00800	 **** SEE TABLE ON NEXT PAGE FOR VARIOUS USES OF CODE #4. ****
00900	
01000	
01100	4 LINES: 4, STF, POS, P4, P5, P6, P7, P8, P9, P10
01200		(P4) NUM OF STAVES UP FOR BAR LINE - IF ALL HIGHER 
01300			PARAMETERS = 0, OR HGT1 (i.e.VERT. POS1 IF LINE).
01400		   FOR HEAVY BAR LINES ADD 100*THICKNESS TO NUMBER IN P4
01500		   ADD 1000 MORE FOR THIN DOUBLE BAR.
01600		2ND DIGIT FROM LEFT WILL MAKE RIGHT HAND BAR THICKER.
01700		(P7) 1=VERT. DASHES. IF P5=50 +N IN P7=CRESC., -=DECRESC.
01800		     2=HORIZ. DASHES.  -1 GIVES VERTICAL WAVEY LINE. 
01900		     3 OR 4=LGE. BRKT. (SEE DIAGRAM FOLLOWING)
02000		     5 MAKES CURVEY BRACKET (AS USED FOR PIANO MUSIC, ETC.)
02100		    
02200		     P9=WIG.UNIT HGT.,  P8 CHANGES WIGGLE WIDTH, THIS AND NEXT
02300		     -2 GIVES HORIZ.WAVEY LINE(P5 GIVES HGT OF WAVE BY NT NUM)
02400				....P6=RIGHT END POINT OF WIGGLE.
02500			P10=ADDED WIDTH FOR WIGGLES AND DASHES.(1=1 MORE, ETC.)
02600	
02700		(P8) NON-ZERO GIVES HORIZ. BOX SIZE(BY NT NUMS) IF P5=50
02800			IF VERT. DASHES, P8 SETS SIZE.(ALSO AFFECTS WIGGLES.)
02900			P8 ALSO CAN AFFECT HEAVY BRACKET. SEE DIAGRAM FOLLOWING.
03000	
03100		(P9) GIVES VERT. BOX SIZE, IF P5=50.(AFFECTS VERT. WIGGLES ALSO.)
03200		(P10)=THICKNESS IF STRAIGHT VERTICAL LINE OR BOX(NOT BAR LINE.)
03300		(P11)=DISPLACEMENT FOR RIGHT SIDE OF BOX (PARALLELAGRAM).
     

00100		RESUME OF CODE 4 PARAMETERS
00200	
00300	----------------------|-------|-------|-------|-------|-------|-------
00400			  P4  |  P5   |  P6   |  P7   |  P8   |  P9   |  P10
00500	----------------------|-------|-------|-------|-------|-------|-------
00600	LINES	 	HGT.1 | HGT.2 | POS.2 |   0   |   0   |   0   |
00700	----------------------|-------|-------|-------|-------|-------|-------
00800	HEAVY VERT.LINE  BOT. |  TOP  |  =P3  |   0   |   0   |   0   | THICKN.
00900	----------------------|-------|-------|-------|-------|-------|-------
01000	BAR LINE    N=NUM. OF |   0   |   0   |       |       |       |
01100	            STAVES UP |       |       |       |       |       |
01200	   (+1000 FOR DBL BAR)|	      |       |       |       |       |
01300	----------------------|-------|-------|-------|-------|-------|-------
01400	HEAVY BAR     N+100*  |   0   |   0   |       |       |       |
01500	            THICKNESS |       |       |       |       |       |
01600	   (+1000 FOR DBL BAR)|	      |       |       |       |       |
01700	                      |       |       |       |       |       |
01800	REPT. BARS  NUM OF    |   1   |   0   |       |       |       |       
01900	           STAVES UP  |       |       |       |       |       |       
02000	 +1000=DOTS TO LEFT   |       |       |       |       |       |       
02100	 +2000=DOTS TO RIGHT  |       |       |       |       |       |       
02200	 +3000=DOTS RT & LFT  |       |       |       |       |       |       
02300	----------------------|-------|-------|-------|-------|-------|-------
02400	HEAVY BRACKET    BOT. |  TOP  |   0   |   3   |   0   |   0   | THICKN.
02500	                 HGT. |  HGT. |       |       |       |       |       
02600	       --OR--         |       |       |       |       |       |       
02700	            N=NUM. OF |   0   |   0   |   4   |   0   |       | THICKN.
02800	            STAVES UP |       |       |       | 1=BOT |       | (0=4)
02900	                      |       |       |       | 2=TOP |       |       
03000	CURVY BRACKET 	   N  |   0   | WIDTH |   5   |       |       |
03100	----------------------|-------|-------|-------|-------|-------|-------
03200	CRESC.	 	 HGT. |  50   | POS.2 | 0  OR |   0   |       |
03300			      |       |       |SPREAD |       |       |
03400			      |       |       |  =N   |       |       |
03500	----------------------|-------|-------|-------|-------|-------|-------
03600	DECRESC. 	 HGT. |  50   | POS.2 | -1 OR |   0   |       |
03700			      |       |       |SPREAD |       |       |
03800			      |       |       |  =-N  |       |       |
03900	----------------------|-------|-------|-------|-------|-------|-------
04000	DASHES - HORIZ.  HGT1.| HGT2. | POS.2 |   1   | DASH  | SPC SZ| THICKN.
04100	(P11=1 FOR BRKT END)  |       |       |       | SIZE  | (0=P8)|
04200	----------------------|-------|-------|-------|-------|-------|-------
04300	DASHES - VERT.   BOT. |  TOP  |   0   |   1   | DASH  |       | THICKN.
04400	  (NO SLOPE)     HGT. |  HGT. |       |       | SIZE  |       |
04500	----------------------|-------|-------|-------|-------|-------|-------
04600	WIGGLE - HORIZ.  HGT. |       | POS.2 |  -2   | WIGL. | WIGL. | THICKN.
04700	  (NO SLOPE)          |       |       |       | WIDTH |  HGT. |
04800	----------------------|-------|-------|-------|-------|-------|-------
04900	WIGGLE - VERT.   BOT. |  TOP  |   0   |  -1   | WIGL. | WIGL. | THICKN.
05000	  (NO SLOPE)     HGT. |  HGT. |       |       | WIDTH |  HGT. |
05100	----------------------|-------|-------|-------|-------|-------|-------
05200	BOXES		 HGT. |  50   |   0   |   0   | WIDTH |  HGT. | THICKN.
05300	(P11=CHNG OF RT. HGT.)|       |       |       |       |0=SQUAR|
05400	----------------------|-------|-------|-------|-------|-------|-------
05500	
05600	
05700	
05800	
05900	
06000	
06100	
06200	
06300	
06400	
06500	5 SLURS: 5, STAFF, POS1, NT1, NT2, POS2, P7=DIP(NT UNITS + OR -), P8, P9
06600		FOR P8 0=SLUR, 1=BRACKET, 2=LFT 1/2 BRKT, 3=RT 1/2 BRKT,
06700	
06800		FOR AUTOMATIC ALIGNMENT OF SLUR WITH NOTES, SET P13=1, THEN
06900		IF P8=-1, END POINTS WILL HOME TO NOTE CENTERS.
07000		IF P8=-2, END POINTS WILL HOME BETWEEN NOTES.
07100	
07200		USE P8=-3 TO HOME BETWEEN NOTES WHERE 1ST IS DOTTED.
07300	
07400		P9=CURVE FACTOR.  DEFAULT VALUE (0)=3  GIVES SLIGHTLY "FLATTENED"
07500		  SLURS. TO MAKE THEM MORE ROUND, DECREASE P9 TOWARD 2. 
07600		  TO RESTRICT THE CURVE TO THE END PORTIONS, INCREASE P9.
07700	
07800	     IF P8=1 AND P9 IS NOT 0, A BRACKET WITH A NUMBER(P9) WILL BE DRAWN.
07900	
08000		HALF SLURS:  ADD 100 TO P7 FOR HALF SLUR WITH THE CURVE ON THE RIGHT.
08100		             ADD 200 TO P7 TO GET CURVE ON THE LEFT.
08200	
08300		SLUR WITH CHANGE OF DIRECTION:  ADD 300 TO P7 TO MAKE SLUR CHANGE
08400			DIRECTION.  IF P7 IS POS. THEN 1ST 'DIP' IS POS.; IF P7 IS
08500			NEG. THEN 1ST 'DIP' IS NEG.
08600	
08700	   USE P10 TO SHIFT HIGH POINT OR 'CENTER' OF CURVE FROM MIDDLE. 
08800		P10=0 IS THE SAME AS P10=.5.  VALUES GREATER THAN .5 MOVE THE CENTER 
08900		TO THE RIGHT, LESS THAN .5 MOVE IT TO THE LEFT.  
09000		(VALUES GREATER THAN .75 OR LESS THAN .25 DO NOT MAKE GOOD CURVES 
09100		AS YET.)
     

00100	
00200	
00300	6 BEAMS: 6, STF, POS1, NT1, NT2, POS2, 
00400			FOR "MINI" BEAMS ADD 100 TO P4 (-100 FOR NEG. NUMS.)
00500	
00600		 (P7)  STEM DIR(10=↑ 20=↓), 
00700	 	  --  2ND DIG. IN P7=TOTAL NUM OF BEAMS.
00800		     IF P7 IS NEGATIVE THEN TREMOLO SLASHES ARE MADE.
00900			  IF TREMOLO, P8 SETS WIDTH. (0=2.2), P9=POS.
01000	
01100		 (P8)  10=LFT,  20=RT. (OR TREM. WIDTH)
01200		       -10,-20=UNATTACHED PARTIAL BEAMS
01300			 A 2ND DIGIT=DISPLACEMENT NUMBER.
01400			-- IF P10 HAS 30+, P8 WILL HAVE POS3 AND
01500			-- P9 WILL HAVE POS4.
01600	
01700		 (P9)  POS3. (OR POS4 IF P10>30.)
01800			   OR POSITION OF TREMOLO
01900		IF P8=0 AND P10=0 AND P9=N, N WILL BE A NUMBER OVER THE BEAM.
02000	
02100		 (P10) = NUM OF BEAMS DISPLACED (NO MORE THAN 9.)
02200		  ADD 10 FOR INNER SHORT PARTIAL →
02300		  ADD 20 FOR INNER SHORT PARTIAL ←
02400		  ADD 30 FOR INNER PARTIAL BETWEEN TWO STEMS.
02500	
02600		      P11 CAN RESET HOMING RANGE (OR -1 = NONE.)
02700	
02800	--------------------------------------------------------|-------|-------
02900							   P8	|  P9	| P10
03000	--------------------------------------------------------|-------|-------
03100	UNATTACHED PARTIAL BEAM POINTING →		  -10	|   0	|  0
03200					 ←		  -20	|   0	|  0	
03300	  DISPLACEMENT IS IN 2ND DIGIT OF P8		   	|    	|    
03400	--------------------------------------------------------|-------|-------
03500	ATTACHED PARTIAL BEAM POINTING →	           10   | POS.3 |  0   
03600				       ←	           20   | POS.3 |  0   
03700	  DISPLACEMENT IS IN 2ND DIGIT OF P8		   	|    	|    
03800	--------------------------------------------------------|-------|-------
03900	INNER PARTIAL BEAM POINTING →			    0   | POS.3 | 10
04000				    ←			    0   | POS.3 | 20
04100	  DISPLACEMENT IS IN 2ND DIGIT OF P10			|	|
04200	--------------------------------------------------------|-------|-------
04300	INNER BEAM             				  POS.3 | POS.4 | 30
04400	  DISPLACEMENT IS IN 2ND DIGIT OF P10			|	|
04500	--------------------------------------------------------|-------|-------
04600	TREMOLO	 		   *****P7=-10 OR -20     WIDTH |TRM,POS| DISP. 
04700	   -PARALLEL TO OTHER BEAMS -TILT IN P3-6    		|	|
04800	    NUMBER OF BEAMS IS SECOND DIGIT OF P7		|	|
04900								|	|
05000	       			   *****P7=-10 OR -20     WIDTH |   0   | DISP. 
05100	 -WITHOUT OTHER BEAMS - STANDARD TILT			|	|
05200	    NUMBER OF BEAMS IS SECOND DIGIT OF P7		|	|
05300	--------------------------------------------------------|-------|-------
05400	NUMBER OVER OR UNDER BEAM			    0	| NUM.	|  0
05500	--------------------------------------------------------|-------|-------
05600	
05700	
05800	
05900	
06000	
06100	
06200	
06300	7 TRILLS,PEDALS,OTTAVA: 7, STF, POS1, VERT.POS, P5=SZ(0=1), P6=POS2, 
06400			P7 (1=NO WIGGLE) IF P7=1, NO WAVEY LINE APPEARS.
06500	
06600		IF P7 IS GREATER THAN 1, PIANO PEDAL SYMBOLS WILL PRINT.
06700			THEN: P5=PEDALS DEPRESSED (USE 3 DIGITS)
06800			000=NONE		001=RIGHT PED. ONLY
06900			010=CENTER PED. ONLY	100=LEFT PED. ONLY
07000			101=OUTER PEDS. 	011=CENTER AND LEFT
07100			110=RIGHT AND CENTER	111=ALL (NOT USUAL)
07200	
07300		P7=2 PLAIN SYMBOL;   =3 ADDS TOP BRACK. EXTENDED TO P6 (POS2).
07400		  =4 ADD LINE TO TOP OF SYMBOL. EXTENDED TO P6 POS.
07500	  	  P8 SETS SIZE OF LINE EXTENSION TO LEFT OF SYMBOL (P7=3 OR 4)
07550		 	P9 IS SIZE FACTOR FOR PEDAL MARKS.
07600	
07700	
07800	  **** OTTAVA *****   P7=8 FOR STANDARD OTTAVA, =-8 FOR OTTAVA BASSA,
07900			       P7=15 FOR 15MA.  SET P8≠0 TO SUPPRESS BRACKET
08000			       ENDING OF DASHED LINE.
08100	
08200	
08300	
08400	8 FOR STAFF LINES: 8,  HGT(STAFF NUM. 3 TO -3), (P3)POS1, 
08500		P4) VERT. SHIFT,  5) SIZE FACTOR (0=1),  P6) POS2.(0=200)
08600		P7) IF SET TO NON-ZERO THE STAFF WILL BE INVISIBLE.
08700		   (USE THIS AS A MEANS TO SET SIZE AND POSITION OF
08800		    NOT APPEARING ON A STAFF.)
08900		P8) USED TO SET MOVE-UP DISTANCE(INCHES) TO NEXT FILE'S
09000		    STAFF 0. (USE P8 ONLY! WITH STAFF 0.)
09100		    HORIZANTAL LINE WILL DISPLAY AT POSITION OF NEXT STAFF 0.
09200	        P9=1 WILL ASK FOR ID NAME FOR THIS STAFF(TO BE USED IN 'PARTS')
09300	
09400	
09500	9 ACCIDS, ACCENTS, ETC.: 9, STF, POS, NOTE NUM, P5, P6=SIZE (0=1)
09600		FOR P5: b=1, #=2, NAT=3, WEDGE ACCENT ∧=4(-4=INV), ACCENT >=5,
09700		FERMATA=6 or 26(-6=INV), STAC. OR DOT=7, REPEAT BAR SIGN=8,
09800			TENUTO OR DASH=9, DNBOW=11, UPBOW=12, HARM,=13, +=14,
09900			THESIS=15, ARSIS=16, MORDANT=17, INV.MORD.=18, TRILL=20
10000			HEAVY WEDGE=21
10100	
10200	   ***** 2 ITEMS MAY BE ENTERED AT ONCE WITH P5. e.g. 47 WILL CREATE
10300		A WEDGE(4) WITH A DOT(7) BELOW IT; 79 MAKES A DOT(7) WITH A
10400		DASH(9) BELOW IT. IF ANY OF THE 2-DIGIT CODES ARE USED, THEY
10500		MUST! COME FIRST.   e.g. 135  MAKES  A  HARMONIC(13) WITH AN
10600		ACCENT(5) BELOW.  ETC.	(513 WILL NOT WORK!)
10700	
10800	
10900	10 NUMBERS: 10, STF, POS, NT NUM, NUM(TO 3 DIGITS ONLY), SIZE FACT., P7
11000		P7=2 GIVES THIN LINE NUMS., =0 = BDR40 TYPE FONT WHEN IT PLOTS.
11100					    =1 = BDI40 (ITALICS)
11200		P8=1 CIRCLES NUMBER, =2 BOXES NUMBER.  P10>1 THICKENS BOX ETC.
11300	
11400		 SET P13 TO 1 FOR AUTOMATIC HOMING.
11500		 (SEE HOMING INFO IN EDIT SECTION.)
11600	
11700	
11800	11 LIBRARY ITEMS: 11, STAFF, POS,  VERT. NOTE NUM, P5)ITEM NUM, 
11900		   P6)HORZ. SZ., P7)VERT. SZ.,   P8,  P9,  P10
12000			P8=-1 FOR FILL ON CRT, =-2 FOR NO FILL ANYWHERE.
12100	
12200		P5 MAY HAVE NUMBERS 0 THROUGH 99.  NUMBERS 0-9 REFER TO
12300		THE "BASIC" DRAW FILE.  (SEE 'DRAW.MAN' FOR PREPERATION
12400		OF 'DRAW' FILES.)  THE "BASIC" FILE SHOULD HAVE A NAME
12500		WITH 4 LETTERS AND THE NUMBER 0 ON THE END.  IF THE "BASIC"
12600		NAME IS 'CHAR0' THEN NUMBERS 10 THROUGH 19 WOULD REFER
12700		TO 'CHAR1'; 20-29 TO 'CHAR2', 30-39 TO 'CHAR3', ETC.
12800	
12900		P9 = CLOCKWISE ROTATION BY DEGREES.
13000		
13100		IF P10 IS SET TO 1 A "BASIC" FILE NAME WILL BE REQUESTED.
13200		THE NAME WILL BE STORED IN P10. ANY TIME P10 IS SET TO 1
13300		THE NAME WILL BE RE-REQUESTED.  ANY TIME P10 IS IGNORED THE
13400		LAST NAME GIVEN WILL BE PUT INTO P10.
13500		THUS SEVERAL ITEMS CAN USE DIFFERENT "BASIC" NAMES.
13600	
13700	
13800	12 CIRCLES AND ARCS: 12, STF, POS,  VERT. NT NUM, 	
13900			P5=RADIUS(BY HORIZ. SCALE NUMS)
14000			P6=DEGR.1, P7=DEGR.2; ZEROS GIVE COMPLETE CIRCLE.
14100			P8=THICKNESS(0=1 LINE, 1=2 LINES, ETC.)
14200	
14300	
14400	16 LETTERS, WORDS, ETC.:
14500	   16, STAFF, POS, VERT. NOTE NUM, P5)=SIZE FACTOR, P6
14600		----- THEN TYPE TEXT ----- 
14700	     ---- SEE SECTION II FOR DETAILS -----
14800	
14900	
15000	17 KEY SIG.: 17,STF,POS,VERT, P5)NUM OF #S OR FLATS(+=#, -=b)
15100			P6=CLEF NUM (0=TREB, =1=BASS, =2=ALTO, =3=TENOR)
15200				FOR MINI CLEFS ADD 100 TO P6.
15300	
15400	
15500	18 METER:  18, STF, POS, VERT, P5)TOP NUM, P6)BOTT NUM, P7)SIZE FACTOR
15600			IF P5=99 THE LETTER C WILL PRINT
15700	
15800	
15900	
16000	
     

00100	---------  SECTION II  --------------
00200	
00300	TYPE 'T' n, n .....  to enter TEXT (letters, words, etc.)
00400	   T, STAFF, POS, P4=VERT. NOTE NUM, P5=SIZE FACTOR
00500		----- THEN TYPE TEXT ----- 
00600	
00610	_________ CHARACTERS AVAILABLE __________
00700	  0-9, A-Z, a-z, and = . - , ' * ( ) " ; : + ? ! 
00710	  SPECIAL CHARACTERS: [ =QUARTER NOTE,  ] =HALF NOTE, 
00715			      ↔ =NATURAL,  ↑ =SHARP,  ↓ =FLAT.
00800	
00900	UP TO 12 CHARACTERS WILL BE PACKED IN AN ITEM.
01000	STRINGS OF MORE THAN 12 CHARACTERS WILL BECOME SEVERAL ITEMS FOR
01100	EDITING PURPOSES.  
01200	TO PLACE ITEMS IN RELATION TO ALREADY PRESENT NOTES, SEPARATE
01300	EACH ITEM BY SLASHES.
01400	THE SLASHES WILL NOT BE DRAWN.(BUT A LINE ENDED WITH ; WILL PRINT ;.)
01500	
01600	IF MORE THAN ONE SLASH APPEARS, NUMBERS WILL APPEAR OVER THE NOTES OF
01700	THAT  STAFF  AND  YOU WILL BE ASKED TO TYPE POSITION NUMBERS FOR EACH
01800	ITEM.    IF P4 (THE VERTICAL POSITION) IS SET TO 0 YOU SHOULD TYPE  2
01900	NUMBERS FOR EACH ITEM.  THE FIRST NUMBER OF A PAIR WILL BE HORIZANTAL
02000	POS., THE SECOND WILL BE VERT. POS.  THE HORIZANTAL NUMBERS  WILL  BE
02100	IN TERMS OF THE NUMBERS OVER THE NOTES.  THUS 1.5,-3 WOULD PUT ITEM 1
02200	EXACTLY HALF WAY BETWEEN NOTE 1  AND  NOTE  2  AND  AT  THE  VERTICAL
02300	POSITION  OF  NOTE  LEVEL  -3.      WITH  1.5,-3 THE ITEM WOULD BE AS
02400	BEFORE.  WITH .7,13 ITEM WOULD BE AT .7  OF  THE  DISTANCE  FROM  THE
02500	BEGINNING OF THE LINE AND THE FIRST NOTE AND AT THE VERTICAL POSITION
02600	13.
02700	
02800	 ------  TYPE 'TF' n, n ...... to enter Text from an 'sos' File. ------
02900	
03000	IF  P4  IS  ANY  NON-ZERO  NUMBER  ALL ITEMS WILL BE PUT AT THE LEVEL
03100	INDICATED IN P4.  IN THIS CASE TYPE ONLY ONE NUMBER  (FOR  HORIZANTAL
03200	POSITION) PER ITEM.  THIS IS PROBABLY THE BEST WAY TO PUT IN THE TEXT
03300	OF VOCAL LINES.
03400	
03500	CURRENTLY (5/74) THREE TYPE FONTS ARE AVAILABLE.  THE DEFAULT FONT IS
03600	CALLED  'PRIMITIVE'.   ALSO  THERE  IS  'BDR40' AND 'BDI40'(ITALICS).
03700	ALL THESE INCLUDE UPPER AND LOWER CASE.  ****** NOTE THAT IF THE TYPE
03800	FONTS  ARE  TO  BE  MIXED THE FIRST ENTRY MUST INCLUDE A FONT CONTROL
03900	CHARACTER EVEN IF IT IS THE DEFAULT FONT.
04000	
04100		FONT CONTROL CHARACTERS:
04200			# = PRIMITIVE  (52)
04300			& = BDR40 (NON-ITALICS) (50)
04400			@ = BDI40 (ITALICS)  (51)
04500			< = OUTLINE ONLY  (53)
04600			> = FILLED   (54) (WILL NEVER FILL ON CRT HOWEVER.)
04700			$ = UPPER CASE (48)
04800		(use these last 2 controls only when not working with display.)
04900			% = LOWER CASE (49)
05000	
05100		WHEN INITIALLY USING THE FONTS THE UPPER-LOWER
05200		CASE CHARACTER MUST APPEAR AS WELL AS THE FONT CHARACTER.
05300		LATER FONT OR CASE CHANGES MAY APPEAR SINGLY.
05400	
05500	EXAMPLES:  TO GET THE FOLLOWING IN NON-ITALICS -
05600	
05700			Clarinet
05800	
05900	TYPE - &Clarinet/           (OR: $&C%LARINET/ WHEN USING ORDINARY TTY.)
06000	
06100		FOR THE NEXT WITH THE 2ND WORD ITALICS, THE 3RD PRIMITIVE-
06200	
06300	TYPE - &Oboe/@cresc./#v.s./
06400	
06500		&<Oboe/  WOULD PRINT "Oboe" in non-filled letters.
06600	
06700	MOST OF THESE COMMANDS ARE SEMI-STICKY.  TO BE SAFE THEY SHOULD BE
06800	RESET EACH TIME USED.
06900	
07000	WHEN LETTERS ARE EDITED THEY APPEAR UNDER CODE #16.  
07100	AT  EDIT  TIME  P13=1  WILL  CAUSE  HOMING  TO  A NEARBY NOTE.  NOW A
07200	NEGATIVE SIZE FACTOR (IN P5) WILL INVERT THE TEXT.  IF THE STAFF SIZE
07300	IS  LATER  CHANGED  THE  SPACING CONTINUITY OF STRINGS LONGER THAN 12
07400	LETTERS  WILL  BE  DISTURBED.   TO  CORRECT  THIS  SET  P10=1 FOR THE
07500	MISPLACED  UNIT  OF  TEXT.   IT  WILL  THEN  AUTOMATICALLY RESUME THE
07600	CORRECT POSITION AND RESET P10 TO 0.
07700	
07800		IN  GENERAL,  P6-P8  SHOULD  NOT  BE  EDITED.   EACH  OF  THE
07900	PARAMETERS  CONTAINS  THE  NUMBERS  FOR  4  CHARACTERS.  A TOTAL OF 8
08000	DIGITS IS USED IN EACH PARAMETER; 2 DIGITS PER CHARACTER.
08100	
08200		 THE STRING 'ABCDEFGHIJKLM' WOULD BECOME:
08300	
08400			P6 -- 10111213
08500			P7 -- 14151617
08600			P8 -- 18192021
08700	
08800		TO SEE THE CONTENTS OF ONE OF THESE PARAMETERS, 6, FOR EXAMPLE,
08900	TYPE '33 6'.  IF YOU THEN TYPED '6 13111213' THE STRING WOULD CHANGE TO
09000	'DBCDEFGHIJKLM'.   THIS METHOD OF EDITING IS NOT RECOMMENDED.
09100	
09200		NUMBERS ARE 0-1, UPPER CASE LETTERS 10-35, LOWER CASE BEGIN
09300		AT 70.  SPACE=47, NO MORE CHARS=99, QTR NOTE=58, HLF NOTE=59.
09400	
09500	(A NEW FORMAT FOR P6-8 WAS ACTIVATED 11/75. TYPE 10,99<CR> WHILE
09600	EDITING TEXT TO AUTOMATICALLY CHANGE THE FORMAT.)
09700	
09800	********  TO CENTER TEXT AT ANY POINT  ********
09900	
10000	A SINGLE INPUT STRING OF TEXT MAY BE CENTERED AT ANY HORIZANTAL POINT
10100	BY  SETTING  P10  TO THE CENTER POINT DESIRED.  WHEN THIS IS DONE THE
10200	TEXT WILL EXTEND AN EQUAL DISTANCE TO THE LEFT AND RIGHT OF THE POINT
10300	GIVEN IN P10.
10400	
10500	
10600	** ROTATION OF INDIVIDUAL LETTERS --- SET P11 TO DEGREES (CLOCKWISE).**
10700	
10800	
10900	
11000	ααααααααα SPECIAL INFO RE. TEXT AND THE 'PARTS' PROGRAM αααααααααα
11100	
11200	WHEN  USING  THE  'PARTS'  PROGRAM  TEXT  WHICH  IS  NOT  PART OF THE
11300	PARTICULAR LINE OF MUSIC BEING EXTRACTED IS USUALLY IGNORED.  TO MAKE
11400	ANY  TEXT  ITEMS  APPEAR  IN ALL PARTS EXTRACTED, ADD 100 TO THE SIZE
11500	FACTOR FOUND IN P5. (SEE SECTION ON 'PARTS' PROGRAM.)
     

00100	--------  SECTION III  -----------
00200	
00300	***********  LETTER COMMANDS  ***************
00400	
00500	'G name' = GET OLD DATA TO WORK ON.
00600	
00700		IF YOU GET THE MESSAGE "UNPACK IT" USE THE MSSAUX PROGRAM.
00800	
00900	'GM name' = GET MORE (ANOTHER FILE) TO ADD TO CURRENT DISPLAY
01000	
01100	'RS' = RESTART.  CLEARS BUFFERS AND SCREEN - NO RECOVERY POSSIBLE!
01200		'RS name' RESTARTS AND 'GETS' FILE 'name'.
01300	
01400	'SA name' - TYPE 'SAVE' OR 'SA'  ('SD' SAVES DISPLAY ONLY FOR DPY.F4)
01500	
01600		IF 'SAME' IS GIVEN AS A FILE NAME THE NAME WILL BE 
01700		SAME AS PREVIOUSLY.
01800	
01900	  'SB name' =SAVE BIG. SAVES ALL IMPORTANT BUFFERS. FOR QUICKER READIN.
02000	  'SM' = 'SB' WITH THE SAME NAME AS PREVIOUSLY.
02100	
02200	   TYPE '99' TO BACK UP FROM FILE NAME REQUEST.
02300	
02400		ONE SHOULD 'SAVE' OFTEN, BUT CAREFULLY TO AVOID LOSS OF ANY
02500		INTPUT.  GENERALLY THE NAMES USED SHOULD HAVE 5 LETTERS
02600		AND END IN A LOGICAL ALPHABETICAL ORDER.  E.G. TRI1A,
02700		TRI1B, TRI1C, ETC. FOR LINES WHICH ARE TO APPEAR IN THAT
02800		ORDER ON THE SAME PAGE.
02900	
03000	
03100	'SC' = SPACING SCALE: SC, STAFF NUM  (101,99 ERASES IT)
03200			(THE SCALE NEED NOT BE ERASED BEFORE SHIFTING IT.)
03300			 TO A NEW STAFF.)
03400	
03500	
03600	'SH' ="SHOW" - WHEN THIS IS TYPED, FROM THIS POINT ON ALL NUMBERS AND
03700		LETTERS USING THE TYPE FONTS BDR AND BDI WILL APPEAR WITH THEIR 
03800		REAL OUTLINES.  
03900	          THIS SHOULD BE USED ONLY FOR CHECKING ON CLOSE SPACING AS
04000	          THE PROGRAM IS SLOWED CONSIDERABLY DUE TO THE GREAT NUMBER
04100	          OF VECTORS TO BE DRAWN.  
04200	'SHP' ="SHOW PRIM" - WILL CAUSE ALL LETTERS TO BE IN 'PRIM' FONT 
04300		(UPPER AND LOWER CASE) ON CRT.
04400	'SHX'  ='EXIT FROM SHOW" - WILL RETURN TO THE ORIGINAL DISPLAY MODE. 
04500		 SEE 7 AND 16 IN REGARD TO FONTS.
04600	
04700	
04800	'SP n' ="SPACING STAFF=n"  ESTABLISHES STAFF n AS THE BASIS FOR
04900	        AUTOMATIC SPACING OF ITEMS ENTERED BY MEANS OF CODES 
05000	        14 OR 144.  	SEE PG.10.
05100	
05200	
05300	'IN n,n,n,n....  "SCORE" INPUT:  -- SEE page 9.
05400	
05500	
05600	'READ name stf#'  "SCORE INPUT FROM 'SOS' FILE -- SEE page 9.
05700	
05800	'P n' = SEE EXACT CURRENT CONTENTS OF PARAMETER n WHILE IN EDIT MODE.
05900	
06000	 **** when NOT in edit mode ****
06100	'P n1,n2,n3  PRINTS RN ARRAY FROM ITEM n1 TO ITEM n2. n3=1 FOR LPT.
06200		(USING LPT IS FATAL! FOR CURRENT DPY AND MUST BE FOLLOWED BY
06300		<CALL>, F<CR> IN ORDER TO RELEASE THE LPT.)
06400		'P' <CR> WILL TYPE DATA FOR ALL ITEMS.
06500	
06600	'Z f x y' 'Z' = ZOOM LENS.  f=SIZE FACTOR, NEW CENTER IS x,y  
06700		(USE -512 TO 512 RANGE)
06800	
06900	IF  THE STAVES -1 THOUGH 2 ARE USED ONLY 2 NUMBERS NEED BE TYPED. Z n
07000	WHERE n IS A NUMBER OF THE FOLLOWING FORM WILL INCREASE THE  SIZE  BY
07100	THE  LEFT DIGIT OF n.    Z 200 WILL MAGNIFY BY 2 AND PUT THE FAR LEFT
07200	SIDE TO THE CENTER OF THE SCREEN.  200.5 WILL KEEP THE	CENTER AS IS.
07300	201 WILL PUT THE FAR RIGHT SIDE TO THE CENTER. 300 WILL MAGNIFY BY 3,
07400	ETC.
07500	
07600	'AD' =ADJUST STEMS TO MEET BEAMS: "AD" STAFF NUM (99=ALL STAVES)
07700				  (ALSO REMOVES TAILS WHERE NEEDED)
07800	
07900	------ HOMING A BEAM FROM ONE STAFF TO ANOTHER -----
08000	'AD' n1 n2 ------ IF 2 NUMBERS FOLLOW AD THE 1ST  SHOULD  BE  THE  ITEM
08100	NUMBER  OF  A  BEAM  AND THE 2ND THE STAFF NUMBER OF A NOTE WHICH THE
08200	BEAM  IS  TO  HIT.   THIS  ALLOWS  THE  BEAM TO HOME TO ANY NOTE ON A
08300	DIFFERENT STAFF.
08400	
08500		BEFORE USING THIS, CERTAIN REQUIREMENTS MUST BE MET.   P6  OF
08600	THE  BEAM SHOULD BE SET TO THE APPROXIMATE HORIZANTAL POSITION OF THE
08700	NOTE TO BE HIT.  P4 AND P5 OF THE BEAM SHOULD BE SET TO  THE  DESIRED
08800	POSITION.  P7 SHOULD INDICATE THE STEM DIRECTION FOR THE BEAM. IF THE
08900	BEAM IS COMPOSITE, THIS PROCEDURE MUST BE FOLLOWED FOR EACH BEAM ITEM
09000	INVOLVED.
09100		THE NOTE ON THE OTHER STAFF MAY HAVE A STEM OF ANY LENGTH AND
09200	IT MAY BE IN FRONT OF OR BEHIND THE ORIGIN POINT OF THE BEAM.  IT  IS
09300	PROBABLY  BEST TO USE THIS FEATURE ONLY AFTER! THE OTHER '19' FEATURE
09400	HAS BEEN USED.  CHECK STEM LENGTHS AND MEETING POINTS CAREFULLY AFTER
09500	USE.
     

00100	--------  SECTION IV  -----------
00200	
00300	******  VARIOUS WAYS TO GET INTO EDIT MODE  ********
00400	
00500	
00600	   TO MOVE LAST ITEM ENTERED LFT-RT OR UP-DOWN:
00700		'L', 'R', 'U' OR 'D' + NUM OF STEPS TO LFT-RT 
00800			(NOTHING ELSE REQUIRED)
00900	   THIS WORKS ONLY IMMEDIATELY AFTER THE ITEM HAS BEEN ENTERED.
01000	
01100	  ONCE IN EDIT MODE, THE SETTING OF P13 TO 1 WILL USUALLY CAUSE THE
01200	  CURRENT ITEM TO CENTER ON A NEARBY NOTE'S HORIZANTAL POSITION.
01300	
01400	
01500	'ED(IT)', POS, STAFF, (CODE NUM) ----- TO USE LIGHT PEN: TYPE 'ED' <CR>
01600	
01700	A VERTICAL LINE WILL APPEAR AT  THE  POSITION  GIVEN  AND  ALL  ITEMS
01800	WITHIN  5  SPACES OF THE LINE ON THAT STAFF WILL COME UP FOR EDITING.
01900	TO PASS OVER AN ITEM TYPE <CR>.  SEE BELOW FOR METHOD OF CHANGING THE
02000	VARIOUS PARAMETERS.
02100	
02200	IF THE STAFF NUMBER IS GREATER THAN 4, ITEMS ON  ALL  STAVES  MAY  BE
02300	EDITED.
02400	
02500	IF A CODE NUMBER IS GIVEN, THE ITEM NEAREST THE LINE WITH THAT NUMBER
02600	WILL COME UP.  FOLLOWING, ALL OTHER ITEMS OF THAT NUMBER ON THAT LINE
02700	WILL COME UP.
02800	
02900		  WITH THE LIGHT PEN, MOVE CURSOR TO THE ITEM TO BE
03000		  EDITED.  TYPE <CR> AND ITEMS ON ALL STAVES NEAR THAT POINT
03100		  WILL COME UP FOR EDITING IN ORDER. (USES SAME MODE
03200		  AS ABOVE.)
03300	
03400	S(ET) AND A(LIGN) ---------
03500	
03600	IF YOU TYPE 'S' WHILE IN THE ABOVE  FORM  OF  EDIT  MODE  ('ED')  THE
03700	VERTICAL  LINE  WILL  JUMP  TO THE POSITION OF THE CURRENT ITEM UNDER
03800	CONSIDERATION. TYPE <CR> TO PROCEED TO OTHER ITEMS.   AT  THIS  POINT
03900	TYPING 'A' WILL  AUTOMATICALLY ALIGN THE CURRENT ITEM TO THE POSITION
04000	OF THE ITEM AT 'SET'.  TYPE 'X' TO EXIT FROM ANY EDIT MODE.
04100	
04200	'LP'=LIGHT PEN --- THIS MAY BE USED IN ANY FORM OF EDIT MODE.  MOVE
04300			THE CURSOR TO THE LOCATION DESIRED FOR THE ITEM.
04400			<CR> WILL MOVE THE ITEM.  NOTE THAT HORIZANTAL
04500			MOVEMENT IS FREE BUT VERTICAL MOVEMENT IS BY STAFF
04600			NUMBERS.  ALL DETAILS OF VERTICAL MOVEMENT MUST BE
04700			TYPED IN.
04800	
04900	
05000	  'I' N = EDIT ITEM NUMBER N
05100			THIS MAY BE TYPED AT ANY TIME WHILE IN EDIT MODE.
05200			THE ITEM INDICATED WILL NEXT COME UP.
05300	  'ST' STAFF NUM, CODE NUM--EDITS ONLY ITEMS OF THAT CODE NUM ON
05400	           THAT STAFF.   IF CODE=0, THEN ALL ITEMS WILL COME UP.
05500	
05600	
05700	***********  HOW TO CHANGE PARAMETERS  ****************
05800	
05900	
06000	  IN EDIT MODE: 'L','R','U', OR 'D' FOLLOWED BY N, MOVES N SPACES TO
06100	    LEFT, RIGHT, UP OR DOWN.  2 DIRS. MAY BE GIVEN AT ONCE.
06200	
06300	  AFTER AN 'L' OR 'R' MOVE HAS BEEN MADE, THE LETTER ALONE (NO NUMBER)
06400	  WILL SUFFICE TO MOVE THE SAME VALUE AGAIN.  THE SAME APPLIES TO 
06500	  THE 'U-D' PAIR.
06600	
06700			****-- OR --****
06800	
06900	  PN1,N1  PN2,N2  PN3,N3  ETC. (TYPE PAIRS OF NUMS TO CHNG PARAMS)
07000			THE FIRST OF EACH PAIR MUST BE THE PARAMETER NUMBER
07100			AND THE SECOND WILL BE THE NEW VALUE FOR THAT PARAM.
07200	
07300			IF 2 ZEROS ARE ADDED AFTER A PARAMETER NUMBER (i.e.
07400			600 INSTEAD OF 6) THE SECOND NUMBER OF THE PAIR
07500			WILL BE ADDED TO THE CURRENT VALUE OF THAT PARAMETER
07600			INSTEAD OF MERELY REPLACING.  THIS IS USEFUL FOR 
07700			EXTENDING P6 OF SLURS OR BEAMS, ETC.
07800	
07900			 <CR> ENDS EDIT AND MOVES TO NEXT ITEM FOR EDIT
08000			 'X' ENDS EDIT, EXITS TO INPUT MODE
08100			 'C'SAVES OLD AND NEW FORMS, I.E. "COPIES" ITEM.
08200			 'C' N  SAVES & MOVES TO ITEM N.
08300			 'DEL'  DELETES ITEM AND MOVES ON TO NEXT
08400	
08500	HOMING	**** SET P13=1 TO HOME IN ON ANY NEARBY NOTE ON SAME STAFF.
08600			(P13 RESETS SELF TO 0)
08700	
08800	
08900	GROUP EDIT COMMANDS - - - - - - - 
09000	
09100	'MOVE' OR 'M' <CR>:  TO MOVE GROUPS OF ITEMS
09200	
09300	 YOU WILL BE ASKED TO TYPE: 
09400			STAFF NUM, POS1, POS2, (CODE NUM)
09500	
09600	    TO SHRINK OR EXPAND ALL STAVES GIVE STAFF NUM = 11.
09700	    IF NO CODE NUM(4TH NUM) IS GIVEN ALL ITEMS IN THE AREA WILL BE MOVED.
09800	
09900	     IF 'L' IS GIVEN AS STAFF NUM, THE AREA TO BE MOVED MUST
10000	     BE INDICATED WITH THE LIGHT PEN.
10100	
10200	   *********  88 NOT WORKING NOW  4/75 **************
10300	    TO MOVE A CONTINUOUS GROUP OF ITEMS TYPE:
10400			88,  1ST ITEM NUM,  LAST ITEM NUM
10500	
10600	          ----- 'ASK' FEATURE ****** NOT WORKING NOW 4/75 *****------
10700	        IF 100 IS ADDED TO THE CODE NUM, YOU WILL BE ASKED IF YOU
10800	   WANT TO MOVE EACH ITEM INDIVIDUALLY.  'X' WILL EXIT FROM 'MOVE'.
10900	
11000	     TYPE '99' AT ANY TIME TO BACKUP WHEN IN 'MOVE', 'COPY', ETC.
11100	
11200	
11300	THE SECOND PROMPT IS:
11400	   TYPE NEW STAFF #, POS1, POS2, UP-DOWN #
11500	
11600	     IF POS2=0, POS1 WILL BE TAKEN AS THE ABSOLUTE 'MOVE' VALUE.
11700	
11800	'COPY' OR 'C' <CR>:  TO COPY GROUPS OF ITEMS.
11900	
12000		WORKS SAME AS 'MOVE' BUT ORGINAL IS LEFT BEHIND.
12100	
12200	'DELETE' OR 'DE' <CR>:  TO DELETE GROUPS OF ITEMS.
12300	
12400		SAME STRUCTURE AS 'MOVE'.
12500	
12600	 *******  N,-99  WILL DELETE ALL LINES EXCEPT! LINE 'N'. 
12700		******** USE WITH GREAT CARE!! *********
12800	
12900	'ALTER' OR 'A' <CR>:  TO ALTER GROUPS OF ITEMS.
13000	
13100		FIRST PART IS SAME AS 'MOVE'.  AFTER THE AREA HAS BEEN
13200		DESIGNATED YOU WILL BE ASKED TO SPECIFY PARAMETER CHANGES
13300		WITH PAIRS OF NUMBERS -- Pn, Change, Pn, Change, etc.
13400	
13500	
13600		IF THE FIRST NUMBER GIVEN IS 12 AND YOU HAVE ALREADY
13700		SPECIFIED CODE NUM 1, ALL NOTE STEMS, BEAMS AND SLURS
13800		IN THE GIVEN AREA WILL BE INVERTED.
13900	
14000		WITH CODE 8 (SLURS), 12 WILL REVERSE THE CURVE AND PUT
14100		IT ON THE "WRONG" SIDE OF THE NOTE.
14200	
14300		IF THE FIRST NUMBER GIVEN IS 100 THEN ALL NOTES, RESTS AND
14400		BEAMS WITHIN THE GIVEN AREA WILL BECOME "MINIS".
14500		USE THIS FOR MAKING CUES, ETC.
14600	
14700	
14800	'J'  WILL AUTOMATICALLY JUSTIFY LINES, ALLOWING PROPER SPACES FOR
14900	       FOR MOST ACCIDENTALS, CLEFS, ETC.  A STAFF NUM >5 WILL JUSTIFY
15000	       ALL LINES AS A UNIT.  IF POS2 = 0, IT WILL BE TAKEN AS 200.
15100	
15200	
15300	'DP' n1, n2, . . . . .: = DISAPPEAR, STF n ....
15400	
15500		THIS MAKES STAFF n, ETC. DISAPPEAR FROM THE DISPLAY.  THIS
15600		DOESN'T DELETE ANY DATA - IT JUST MAKES IT TEMPORARILY
15700		INVISIBLE.  THERE ARE 2 REASONS FOR DOING THIS.  WHEN SEVERAL
15800		STAVES ARE BEING USED THERE IS SOMETIMES CONSIDERABLE FLICKER ON
15900		THE DISPLAY.  'DP' ALLOWS ONLY SELECTED STAVES TO APPEAR, THUS
16000		STOPPING THE FLICKER.  ALSO WHEN THE SYSTEM IS HEAVILY LOADED
16100		MANY FEATURES OF THIS PROGRAM WILL RUN MUCH FASTER IF 'DP' IS
16200		USED.  TO MAKE ANY STAFF REAPPEAR JUST TYPE 'DP' n 99 AND THE
16300		STAFF WILL COME BACK.  
16400		END WITH A 99 TO MAKE THE EFFECT IMMEDIATE.
16500		'DP 11' MAKES ALL INVISIBLE STAVES REAPPEAR IMMEDIATELY.
     

00100	--------  SECTION V  ---------
00200	
00300	  'SCORE' ITEMS: NOTES-- 'IN', STAFF, MODE
00400	
00500		'READ' (INSTEAD OF 'IN')WILL READ EDIT FILE. SEE BELOW FOR FILE
00600		FORMAT.  THE PROGRAM WILL ASK FOR STAFF NUMBER AND FILE NAME.
00700	
00800	****** THERE ARE 3 INPUT MODES POSSIBLE.  THE 1ST DEALS SEPARATELY
00900		WITH PITCH AND RHYTHM PARAMETERS.  THE 2ND COMBINES THEM
01000		IN ONE INPUT LIST.  ALL THE EXAMPLES BELOW (UNTIL MODE 2
01100		IS MENTIONED) WILL REFER TO MODE 1.
01200			TO USE MODE 2 SET P3 TO 2.  e.g. IN -3 2
01300	
01400		THE 3RD MODE IS TO BE USED WHEN A USER-ADDED SUBROUTINE IS
01500		TO BE ACCESSED.  SET THE MODE NUMBER TO 500 FOR THIS.
01600	
01700	
01800	****  HOW TO USE "SCORE" ITEMS  ****
01900	
02000		 NOTES ARE TYPED IN ALMOST EXACTLY AS IN THE "SCORE" PROGRAM.
02100	  I.E. S=#, F=b, N=NATURAL (bb AND ## ARE NOT AVAILABLE YET.)
02200	  OCTAVE NUMBERS MUST BE USED.  'P' (FOR PROXIMITY MODE) MAY
02300	  BE USED.  'O' RETURNS TO ORDINARY MODE.
02400	
02500	 R=REST   RI=INVISIBLE REST
02600	 RU=REST UP(ABOVE STAFF)   RD=REST DOWN(BELOW STAFF)
02700	 RW=WHOLE REST   Rn=WHOLE REST WITH THE NUMBER n ABOVE IT (UP TO 99).
02710	 RR=A REPEAT BAR SIGN (./.) IN THE PLACE OF A CENTERED WHOLE REST.
02800	
02900	ALL OF THESE MUST BE GIVEN TIME VALUES UNDER 'RHYTHM' BUT THE LAST
03000	THREE MAY BE GIVEN ANY RHYTHMIC VALUE DESIRED.
03100	
03200		  TREBLE CLEF IS ASSUMED.  TO ENTER A CLEF, TYPE CLEF NAME 
03300	  FOLLOWED BY A SLASH. (TR/  BA/  AL/  TEN/)   PRECEDED  THE  CLEF
03400	  NAME BY A MINUS SIGN (-BA/) TO HAVE THE AFFECT OF A CLEF WITHOUT
03500	  THE CLEF ACTUALLY APPEARING. (IF NO CLEF IS GIVEN IT WILL ALWAYS
03600	  BE TREBLE CLEF POSITION.)
03700	
03800	USE 'M' (FOR MEASURE) TO ENTER A BAR LINE.  'M2' WILL MAKE A  BAR  GO
03900	UP 2 STAVES; 'M3' WILL GO UP 3 STAVES, ETC.
04000	'MD', 'MD2', ETC. WILL MAKE A DOUBLE BAR WITH THE HEAVY ONE TO THE 
04100	LEFT.  (THESE MUST BE EDITED LATER TO MAKE THIN DOUBLE BARS, REPEAT
04200	BARS, ETC.)
04300	
04400	  METER (TIME SIGNATURE) MAY BE ENTERED WITH /n,m/ WHERE n,m ARE THE
04500	  TOP AND BOTTOM METER NUMBERS.  IF n=99 AND m=1 THE LETTER C WILL
04600	  PRINT. (THE 1 MUST BE THERE. i.e./99 1/)  /98 1/ GIVES 'ALLA BREVE'.
04700	
04800	  FOR KEY SIGS TYPE /Kna/ WHERE n=NUMBER OF ACCIDENTALS AND
04900			a='S' OR 'F' FOR FLATS.
04910			OR -- /Kn/   IF n IS POSITIVE, n=NUMBER OF SHARPS.
04920				     IF n IS NEGATIVE, n=NUMBER OF FLATS.
05000	
05010	*************************************************
05100	  NO MORE THAN 72 CHARACTERS MAY APPEAR ON ONE LINE OF INPUT. 
05110	  (BUT MORE THAN ONE LINE MAY BE USED.)
05120	
05300	  THE LINE MUST END WITH A SLASH OR, WHEN NO MORE NOTES ARE
05400	  TO APPEAR, WITH A SEMI-COLON. (DO NOT!! END LINE WITH A COLON.)
05410	*************************************************
05500	
05600		THE MOTIVIC FEATURES OF "SCORE" MAY BE USED WITH INPUT
05700		MODE 1 (BUT WITH NO "NESTING").  MOTIVES ARE SAVED 
05800		WITH DISPLAY DATA AND CAN BE REUSED WHEN WORKING LATER.  
05900	  (NO MORE THAN 200 ITEMS CAN BE SAVED IN ANY  LIST OF MOTIVES.)
06000		THE TRANSPOSITION FEATURES ASSOCIATED WITH THE 'MOTIVIC'
06100		PROCEDURES ARE A LITTLE DIFFERENT IN MSS AS COMPARED TO 
06200		'SCORE'.  IN THE FOLLOWING EXAMPLE A SCALE AND CHORD ARE
06300		ARE SET UP AS SEPARATE MOTIVES AND IN COMBINATION TO FORM
06400		A 3RD MOTIVE.
06500	
06600		A(C4/D/EF/F)/B(D:F:AF)/Q(@A/@B)/
06700	
06800		THIS WOULD CAUSE THE SCALE AND THE CHORD TO PRINT TWICE.
06900		THEN - -
07000	
07100			@A4/@Q3/     WILL GIVE THE SAME AS - -
07200	
07300		G4/A/BF/C5/ F4/G/AF/BF/ G:B:DF5/
07400	       |__________| |_________| |______|
07500	      'A' ↑ 4 STEPS   'A' ↑ 3   'B' ↑ 3
07600			    |__________________|
07700				'Q' ↑ 3 STEPS
07800	
07900		RETROGRADES AND INVERSIONS MAY BE USED, BUT DON'T FORGET
08000		THAT THE SAME ACCIDENTALS WILL ALWAYS APPEAR ON EACH NOTE
08100		NO MATTER WHAT THE NUMBER OF STEPS OF CHANGE.
08200	
08300	  CHORDS ARE CONSTRUCTED BY USING THE COLON IN PLACE OF THE SLASH
08400	  BETWEEN NOTES.
08500	
08600	  THE COLON CAUSES THE NOTE TO OCCUPY THE SAME RHYTHMIC POSITION
08700	  AS THE FIRST NOTE TO APPEAR AFTER A COLON.  THE STEM DIRECTION IN
08800	  CHORDS WILL BE DETERMINED BY THE ORDER OF APPEARANCE OF THE NOTES.
08900	  IF THE FIRST NOTE IS THE LOWEST, THE STEM GOES UP; IF THE FIRST IS
09000	  THE HIGHEST, THE STEM GOES DOWN.  POSITIONING OF NOTES ON PROPER
09100	  SIDE OF STEM AND (IN MOST CASES) SPACING OF ACCIDENTALS AND DOTS
09200	  IS AUTOMATIC.
09300	
09400	   NOTE THAT SINCE ALL THE NOTES OF A CHORD USE ONLY ONE RHYTHM
09500	   ALL REPEAT FEATURES CONSIDER ALL NOTES OF A CHORD AS ONE 
09600	   ENTITY.   / C4 / D:F:A / REP 2 3/  WILL DRAW THE SEQUENCE 
09700	   C, D MINOR CHORD THREE TIMES.  / D:F:A X3/ DRAWS 3 CHORDS.
09800	   / D:F:A //// MAKES 4 CHORDS.
09810	  
09820	   ----- SPECIAL OCTAVE FEATURE -----
09830	  TO MAKE OCTAVES, FOLLOW ANY NOTE NAME BY A '+' OR '-'.  THE '+'
09840	  WILL CAUSE THE GIVEN NOTE TO APPEAR WITH ITS UPPER OCTAVE;
09850	  THE '-' CREATES THE LOWER OCTAVE.  NOTE IN THIS CASE ONLY!,
09860	  THAT THE OCTAVE NUMBER OF THE GIVEN NOTE IS THE ONE THAT
09870	  IS 'STICKY'.  FOR EXAMPLE /C4+/D+/E+/ WILL PRODUCE OCTAVES
09880	  WITH STEMS UP AS IF YOU TYPED /C4:C5/D4:D5/E4:E5/.  CHORDS THAT
09890	  INCLUDE AN OCTAVE MAY BE TYPED AS FOLLOWS: /EF5-:CN:AN4/.  THIS
09900	  IS THE SAME AS IF YOU TYPED /EF5:CN:AN4:EF/.
09910	
10000	
10100		ALL NON-RHYTHMIC ITEMS (CLEFS, ETC.) WILL BE IGNORED IN 
10200		REGARD TO THE 1ST NUMBER AFTER 'REP'.
10300		/ C4 / M / D:F:A / REP 2,3 / WILL CONSIDER THE 2 ITEMS
10400		TO BE 'C' AND THE D MINOR CHORD, BUT THE BAR LINE WILL
10500		BE INCLUDED IN THE REPEAT.  THUS THE PROGRAM WILL DRAW
10600		'C', 'BAR', 'D MINOR' - THREE TIMES.
10700	
10800	  GRACE NOTES MAY BE USED -- SEE UNDER RHYTHM BELOW.
10900	
11000		TO BYPASS AUTOMATIC STEM DIRECTIONS TYPE SU/ (STEM UP) OR SD/
11100	(STEM DOWN).   ONCE EITHER OF THESE APPEARS ALL THE STEMS WILL GO  IN
11200	THE INDICATED DIRECTION UNTIL A CHANGE IS GIVEN.
11210	
11220		BECAUSE OF POSSIBLE PROBLEMS WITH THE AUTOMATIC BEAM ROUTINE
11230		IT IS BEST THAT AN 'SU' OR 'SD' APPEAR AT THE BEGINNING OF A
11240		LINE IF THIS FEATURE IS TO BE USED AT ALL.
11300	
11400	********* NOTE THAT ALL REPEAT FEATURES (X, /, REP) IGNORE 'SD', 'SU'
11500	AND 'M' INDICATIONS.   THUS   M/C4/SD/E/F/M/SU/REP 3/  WILL DISPLAY A
11600	BAR LINE,  C,  E AND F WITH STEMS DOWN, A BARLINE, C WITH STEM UP AND
11700	E AND F WITH STEMS DOWN AND FINALLY ANOTHER  BARLINE.    THE  'REP 3'
11800	SAYS THAT 3 NOTES AND THE THINGS THAT GO WITH THEM WILL BE REPEATED.
11900	
12000	   (INPUT MODE 1)
12100	   EX.  M/BASS/ K4F /T12 8 /C3/EF/E/ M /D X 3/EN2:GS:B/M;
12200	
12300	    A BAR LINE COMES FIRST, THEN BASS CLEF.
12400	    NEXT IS A 4 FLAT KEY SIGNATURE, FOLLOWED BY 12/8 TIME.
12500	    THE 3RD NOTE WILL BE AN 'E' WITH NO ACCIDENTAL.
12600	    A BAR LINE WILL PRECEED THE THREE Ds.
12700	    THE LAST 3 NOTES WILL BE AN E MAJOR CHORD.
12800	    ENDS WITH A BAR LINE.
12900		(In the example above the spaces on either side of the
13000		slashes are optional [to help proof reading].  The space
13100	    	between 12 and 8 in  "T12 8" is required.)
13200	
13300	
13400		AFTER THE LAST NOTE HAS BEEN ENTERED THE PROGRAM WILL 
13500	  ASK FOR 'POS1, POS2, (SPC)'.
13600	  THE NOTES WILL BE EVENLY SPACED BETWEEN THE 2 POSITIONS ENTERED.
13700	(<CR>=0,200)  AFTER THE RHYTHM IS ENTERED THE NOTES  WILL  BE  SPACED
13800	EXACTLY  ACCORDING  TO  THEIR  RHYTHMIC  VALUES  IF NO 3RD NUMBER WAS
13900	TYPED. IF A 3RD NUMBER IS ENTERED, THE RHYTHMIC VALUES WILL BE SPACED
14000	ACCORDING  TO  A  PSUEDO-FIBONACCI  SCALE.  I.E. HALF NOTES WILL TAKE
14100	SOMEWHAT LESS THAN TWICE AS MUCH SPACE AS  QUARTERS,  ETC.   ---  USE
14200	THIS  MOSTLY  FOR  SINGLE-LINE PARTS!!  
14300	
14400	NEXT YOU WILL BE ASKED TO 'TYPE RHYTHM'.
14500	  '99' WILL BACK UP, '999' WILL ESCAPE FROM "SCORE" MODE.
14600	
14700	   A rhythmic duration must be given for each note, rest or 
14800	   chord previously entered. (Clefs, bar lines, etc. should
14900	   ignored.)
15000	
15100	THE MOST COMMON RHYTHMIC VALUES MAY BE  ENTERED  WITH  LETTER  NAMES.
15200	
15300	S=SIXTEENTH,  E=EIGHTH,  Q=QUARTER,  H=HALF, W=WHOLE, D=DOUBLE WHOLE,
15400		 T=TRIPLET(i.e.12th NOTES) , G=GRACE NOTE (OR 88TH)
15500	
15600	  'T' IN FRONT OF ANY OF THE LETTERS (EXCEPT 'G') WILL PRODUCE THE
15700	  TRIPLET VALUE OF THAT UNIT.  E.G. 'TQ' = A TRIPLET QUARTER NOTE.
15800	 ('T' CANNOT BE USED DIRECTLY IN FRONT OF NUMBERS!)
15900	
16000	THESE ARE THE ONLY! LETTER NAMES  THAT  MAY  BE  USED.   HOWEVER  ANY
16100	RHYTHMIC  VALUE,  NO  MATTER HOW COMPLEX, MAY BE ENTERED IN NUMERICAL
16200	FORM.  16=SIXTEENTH, 10=TEN IN THE TIME OF A WHOLE NOTE, 12=TWELVE IN
16300	THE TIME OF  A  WHOLE  NOTE(THE  NORMAL  TRIPLET), ETC.   NUMBERS AND
16400	LETTERS MAY BE MIXED IF DESIRED.
16500	
16600	DOTTED RHYTHMS WILL AUTOMATICALLY PUT DOTS ON NOTES.    MORE  COMPLEX
16700	RHYTHMS  MUST  BE  DOTTED  INDIVIDUALLY.   (THEY  WILL  BE  CORRECTLY
16800	SPACED.)
16900	
17000	   4 16TH NOTES, A QUARTER, A DOTTED 8TH, 16TH, HALF,
17100	   3 TRIPLETS, AND A WHOLE NOTE FOLLOW:
17200	
17300		16////4/8./16/2/12///1;
17400		(OR: S////Q/E./S/H/T///W; )
17500	
17600		**** FOR GRACE NOTES, TYPE 'G' OR RHYTHMIC VALUE OF 88.
17700	
17800	
17900	******  INPUT MODE 2 ********  ONLY DIFFERENT FOR NOTES AND RHYTHMS
18000	
18100	   IN THIS CASE EACH NEW RHYTHMIC VALUE (NUMBERS ONLY) MUST BE 
18200	   ENTERED JUST BEFORE THE NOTE (OR CHORD) TO WHICH IT WILL APPLY. 
18300	   REPEAT FEATURES WILL ACT IN THE NORMAL WAY.
18400	
18500		TR/4 C4/ D / 8 E/F// 16 G/ A/ 4//REP 4;
18600	   PRODUCES - TREBLE CLEF, QUARTER-C, QUARTER-D, EIGHTH-E,
18700	   2 TIMES 8TH-F, 16TH-G, 16TH-A, QUARTER-A, QUARTER-A, THE LAST 4
18800	   ITEMS (G A A A)REPEAT WITH THEIR GIVEN RHYTHMS.
18900		OF COURSE THERE WILL NOW BE NO PROMPT FOR RHYTHMS.
19000	
19100	
19200		AFTER THE RHYTHM HAS BEEN ENTERED THE NEXT  REQUEST  IS  'ADD
19300	MARKS?'  TYPE 'Y', 'N', 99 OR 999. IF 'YES' GIVE NOTE NUMBERS AND THE
19400	ABBREVIATIONS FOR MARK NAMES.  WHEN  COUNTING  NOTES,  IGNORE  RESTS,
19500	CLEFS  ETC.   CHORDS  COUNT  AS  1  NOTE.  THE  ABBREVIATIONS FOR THE
19600	ACCENTS,  ETC.  ARE   W(EDGE),   A(CCENT),   FE(RMATA),   S(TACCATO),
19700	T(ENUTO)(DASH),  D(OWN  BOW), U(P BOW), H(ARMONIC), PL(US), CR(ESC.),
19800	HW (HEAVY WEDGE), DI(M.), AC(CEL.), R(IT.), C+, C-. 
19900		THE  LAST  TWO  LISTED, C+,C-, WILL PRODUCE THE LINEAR CRESC.
20000	AND  DECRESC.  SIGNS.   WITH  THESE  TWO  ITEMS ONLY! YOU MUST TYPE A
20100	SECOND POSITION NUMBER.
20200	
20300	 /1.3  C+  3/	PUTS A CRESC. SIGN FROM BETWEEN  NOTES 1 AND 2 EXTENDING
20400			TO NOTE 3.
20500	
20600	 /.5  C-  3.5/ 	PUTS A DECRESC. SIGN FROM 1/2 WAY BETWEEN  THE POSITION 1
20700	(GIVEN EARLIER) AND NOTE 1 TO A POINT 1/2 WAY BETWEEN NOTES 3 AND 4.
20800	
20900	
21000	THE DYNAMICS, ETC. WHICH MAY BE ENTERED  ARE:
21100	
21200	 PPP, PP, P, MP, MF, F, FF, FFF, CRESC., DIM., ACCEL., RIT.
21300	
21400	ALL THESE MAY BE PUT DIRECTLY UNDER NOTES, OR, BY USING FRACTIONAL NOTE
21500	NUMBERS, BETWEEN NOTES.
21600	
21700		/1.5 PP/  PUTS PP 1/2 WAY BETWEEN NOTES 1 AND 2.
21800	
21900	
22000	UP TO 2 MARKS(I.E. NOT DYNAMICS, ETC.)  MAY BE ENTERED FOR
22100	EACH NOTE -- BUT EACH MARK MUST BE ENTERED SEPARATELY  WITH  ITS NOTE
22200	NUMBER. IN ADDITION TO THE MARKS A DYNAMIC INDICATION, ETC. MAY BE 
22300	ENTERED FOR THE SAME NOTE.
22400	
22500		EXAMPLE:  1 A / 6 A / 7 T / 10 S / 10 W;
22600		 = 1 ACCENT/6 ACCENT/7 TENUTO/10 STACCATO/10 WEDGE ACCENT
22700	
22800	
22900	     NEXT YOU WILL BE ASKED 'ADD BEAMS?'  TYPE 'Y', 'N' OR nB TO THIS.
23000		nB WILL PLACE BEAMS AUTOMATICALLY. (SEE BELOW)
23100	        '99' WILL BACK UP, '999' WILL ERASE INPUT AND 
23200	        LEAVE "SCORE" MODE.
23300	
23400	        'G' (FOR GO) (INSTEAD OF 'Y' OR 'N') WILL OMIT ALL FURTHER
23500	        PROMPTS IN THIS MODE.
23600	
23700	BEAMS WILL BE ENTERED AUTOMATICALLY  IF  YOU  TYPE  nB;  WHERE  n=THE
23800	NUMBER  OF  EIGHTH  NOTES  TO  BE  BEAMED TOGETHER.  2B; WILL BEAM BY
23900	QUARTERS (I.E. 2 8THS), 3B; GIVES STANDARD BEAMING  FOR  3/8  OR  6/8
24000	TIME.   DECIMAL NUMBERS MAY BE USED FOR N. THUS 1.5B; WOULD BEAM EACH
24100	GROUP OF 3 16THS.
24200	
24300	IF IRREGULAR BEAMS ARE NEEDED, GIVE THE NOTE NUMBERS  FOR  THE  FIRST
24400	AND  LAST  NOTES  TO BE UNDER EACH BEAM.  NORMALLY THE STEM DIRECTION
24500	FOR ALL NOTES UNDER A BEAM WILL BE DETERMINED AUTOMATICALLY.  HOWEVER
24600	IF  YOU  SHOULD  WISH  TO GO AGAINST THE NORM ADD 100 TO THE 2ND NOTE
24700	NUMBER TO INSURE THAT ALL STEMS GO UP OR ADD 200  (OR  JUST  '-')  TO
24800	MAKE ALL STEMS GO DOWN.
24900	
25000	WHEN COUNTING NOTES, IGNORE RESTS, CLEFS ETC.  CHORDS COUNT AS 
25100	ONE NOTE.
25200	
25300		IF YOU HAVE 4 16TH NOTES (STEMS UP) FOLLOWED BY 2 QUARTERS
25400	 AND  3 8THS (YOU WISH TO BE SURE THE STEMS DOWN) TYPE:
25500	
25600		1,4 / 7  209 ;
25700	
25800	  SOME PARTIAL BEAMS MAY HAVE TO BE ADDED INDIVIDUALLY AS YET.
25900	
26000	      ****** AUTOMATIC BEAMS ****** IN MOST SIMPLE SITUATIONS ALL THE
26100	      BEAMS MAY BE PLACED AUTOMATICALLY BY SIMPLY TYPING "2B;". (OR
26200	      "3B;")   2B; WILL CAUSE ALL LOGICAL BEAM CONNECTIONS TO BE MADE
26300	      IN TERMS OF DUPLE RHYTHM.  USE 3B; FOR TRIPLE RHYTHMS SUCH AS
26400	      3/8, 6/8, 9/8, ETC.  THE BASIC UNIT FOR 2B; IS THE QUARTER NOTE
26500	      AND THE BASIC UNIT FOR 3B; IS THE DOTTED QUARTER.
26600	
26700	
26800	    LASTLY YOU WILL BE ASKED 'ADD SLURS?'  
26900	    TYPE 'Y' OR 'N'. TO THIS.
27000	
27100	IF SLURS ARE ADDED, THE ORDER NUMBERS OF THE NOTES AT  THE  BEGINNING
27200	AND END OF THE SLUR MUST BE GIVEN.  NORMALLY  THE  DIRECTION  OF  THE
27300	'DIP'  OF  THE  SLUR  WILL BE DETERMINED BY THE STEM DIRECTION OF THE
27400	FIRST NOTE INVOLVED.  IF THE LAST NOTE UNDER A SLUR HAS THE  OPPOSITE
27500	STEM  DIRECTION  THEN  THE  VERTICAL POSITION OF THE RIGHT END OF THE
27600	SLUR WILL BE JUST BEYOND THE  END  OF  THE  STEM.   (WHEN  BEAMS  ARE
27700	INVOLVED  THE SLUR MAY POSSIBLY BUMP INTO THE BEAM.  THESE SITUATIONS
27800	MUST BE EDITED AFTER THE INPUT IS ENDED.) 
27900		SLURS  MAY  BE MADE TO GO COUNTER TO THE NORMAL BY ADDING 100
28000	TO THE 2ND NOTE NUMBER TO INSURE THAT  THE  'DIP'  BE  UPWARD  OR  BY
28100	ADDING  200  (OR A - SIGN) TO THE 2ND NUMBER TO INSURE THAT THE 'DIP'
28200	BE DOWNWARD.
28300	
28400		THE AMOUNT OF CURVE WILL DEPEND ON THE CONFIGURATION  OF  THE
28500	NOTES  BETWEEN  THE END POINTS.  IN EXTREME SITUATIONS IT IS PROBABLE
28600	THAT THE RESULT OF THIS AUTOMATIC PROCEDURE WILL HAVE TO BE EDITED.
28700	
28800		A TYPICAL EXAMPLE OF INPUT:   2,-3/ 2,-7/ 8,11;
28900					OR: 2 203/ 2 207/ 8 11;
29000	
29100			THIS WILL PUT SLURS FROM 2ND TO 3RD NOTE, 2ND TO 7TH
29200			AND 8TH TO 11TH.
29300	
29400	TO  SLUR  INTO THE 1ST NOTE, TYPE -1,1/ OR -1, -1/.  TO SLUR OUT FROM
29500	THE LAST  NOTE,  TYPE  'N,99;',  'N,199',  'N,299'  OR  N,-99;  WHERE
29600	N=NUMBER OF LAST NOTE.
29700	
29800	  ***** NOTE THAT TIES BETWEEN THE INNER NOTES OF TWO CHORDS CANNOT
29900		BE DONE AUTOMATICALLY AS YET.
30000	
30100	TO MAKE NUMBERED BRACKETS (FOR TRIPLETS, ETC.) INSTEAD OF SLURS, TYPE
30200	THE  NUMBER  (ONE  DIGIT ONLY) DESIRED TO THE RIGHT OF THE DECIMAL OF
30300	THE FIRST OF A PAIR.  THUS TO PUT A BRACKETED 3 OVER NOTES  7  TO  9,
30400	TYPE  7.3  9/ .   AS WITH SLURS, THE SECOND NUMBER MAY BE NEGATIVE TO
30500	GET A DOWNWARD BRACKET.
30600	
30700	
30800	∞∞∞∞∞ FOR 'BEAMS', 'MARKS' AND 'SLURS' A 2ND LINE OF INPUT MAY BE
30900		GIVEN IF THE 1ST LINE ENDS WITH '/' INSTEAD OF ';'.
31000	
31100		ALL ITEMS ENTERED UNDER 'IN' OR 'READ' MAY BE EDITED LATER AS
31200	IF THEY WERE ENTERED INDIVIDUALLY.
31300	
31400	FOR 'READ':      FOLLOWING IS THE FILE FORMAT FOR "SCORE" INPUT FROM
31500	   AN EXTERNALLY EDITED FILE.  THE NAME OF THE FILE CAN HAVE NO MORE
31600	   THAN FIVE LETTERS.
31700	
31800		00100   (NOTES) . . . ;
31900		00200   (RHYTHM) . . . ;
32000		00300   (ACCENTS) . . ;  BLANK LINE = NO MARKS
32100		00400   (BEAMS) . . ; A BLANK LINE = NO BEAMS
32200		00500   (SLURS) . . ;  BLANK LINE = NO SLURS
32300	
32400		(2ND LINES MAY BE ADDED WITH ALL ITEMS.)
32500	
32600	    THIS SEQUENCE MAY BE REPEATED SEVERAL TIMES.  THE PROGRAM WILL
32700	    ASK FOR EACH OF THE STAFF NUMBERS.
32800	
32900	
33000	****  SUMMARY OF SCORE CODES ****
33100	
33200	NOTES 		A-G
33300	ACCIDENTALS	F-S-N
33400	REST		R, RI FOR INVISIBLE REST, RW FOR WHOLE REST ALWAYS.
33500	CLEFS		TR-BA-AL-TE    -TR, -BA, ETC. =INVISIBLE CLEF
33600	BAR, MEASURE	M
33700	KEY SIG.	KnS OR KnF
33800	METER,TIME SIG.	Tn,m
33900	STEM DIRECTION	SU-SD
34000	iXn		REPEAT ITEM i A TOTAL OF n TIMES.
34100	REP n,m		REPEAT LAST n ITEMS A TOTAL OF m TIMES.
34200	Xn m		SAME AS REP.
34300	ACCENT		A
34400	WEDGE		W
34500	HEAVY WEDGE	HW
34600	TENUTO		T
34700	STACCATO	S
34800	HARMONIC	H
34900	FERMATA		FE
35000	DOWN BOW	D
35100	UP BOW		U
35200	+(PLUS)		PL
35300	THESIS		TH		
35400	ARSIS		AR
35500	MORDANT		MO
35600	INV. MORD.	I
35700	TRILL		TR
35800	PPP, PP, P, MP, MF, F, FF, FFF
35900	CRESC.		C
36000	ACCEL.		AC
36100	DIM.		DI
36200	RIT.		R
36300	< (CRESC.)	n1 C+ n2
36400	> (DECRESC.)	n1 C- n2
     

00100	---------  SECTION VI  -----------
00200	
00300	********* TO SET UP AUTOMATIC IRREGULAR RHYTHMIC SPACING *******
00400	---- TYPE 'SP' n  to setup STAFF n as basis for automatic spacing. ---
00500	
00600		ANY  NOTES WHICH APPEAR ON STAFF n WILL CAUSE ALL ITEMS LATER
00700	ENTERED WITH 'IN' OR 'READ' TO BE  SPACED  ACCORDING  TO THE  SPACING
00800	GIVEN  ON  STAFF n. 
00900	
01000		 ALL FURTHER LINES ENTERED WILL CONFORM TO THE SPACING ON
01100		 STAFF n UNLESS THE STAFF IS DELETED OR 'SP' IS AGAIN TYPED,
01200		 FOLLOWED BY SOME NEW NUMBER.
01300	
01400	    ------N.B. IF ANY EDITING OF STAFF n IS DONE BE SURE THAT THE 
01500		SPACE VALUES IN P9 OF NOTES OR P7 OF RESTS IS CORRECT.  THE
01600		AUTOMATIC SPACING IS BASED ON THESE VALUES.  THE VALUES ARE
01700		SET WHEN 'IN' OR 'READ' IS USED.  THE BASIC VALUE IS ONE
01800		QUARTER=1.  HALF=2, WHOLE=4, EIGHTH=.5, SIXTEENTH=.25, ETC.
01900	
02000		NOTE THAT 'SP' MUST BE RESET AFTER ANY RESTART OR WHEN
02100		RE-RUNNING THE PROGRAM.
02200	
02300	  IT IS BEST TO ACCOUNT FOR ALL BAR LINES, CLEFS, METERS, ETC.
02400	
02500	
02600	IN GENERAL, IT IS PROBABLY BETTER TO USE MANY SMALL VALUES ON 
02700	STAFF n.  THIS WAY IT IS EASIER TO MAKE MANY DELICATE ADJUSTMENTS.
02800	
02900	
03000	*******   PARTS   ********
03100	
03200	
03300	     THE PART EXTRACTOR IS CURRENTLY (4/76) KNOWN AS PT.DMP[MSS,LCS].
03400	BEFORE USING  'PT' CERTAIN  CONDITIONS  MUST  BE  MET  IN  THE  FILES
03500	CONTAINING THE DATA FOR THE FULL SCORE.
03600	
03700		THE STAFF FOR EACH INSTRUMENT IN  THE  SCORE  MUST  HAVE  ITS
03800	UNIQUE  NAME (UP TO 5 LETTERS LONG.) THIS WILL RESIDE IN PARAMETER 9.
03900	THE NAME IS ENTERED BY SETTING P9 TO 1.  THEN 'MS'  WILL  ASK  FOR  A
04000	NAME.
04100		IF SOMETIMES 2 INSTRUMENTS ARE ON THE SAME LINE GIVE  ANOTHER
04200	NAME  FOR  THAT LINE.  SUPPOSE YOU HAVE 'OBOE1' AND 'OBOE2' LINES BUT
04300	OCCASIONALLY THEY APPEAR ON A SINGLE SCORE LINE.  IN THIS  CASE  GIVE
04400	THAT LINE  A  NAME SUCH AS 'OBOEX'.  THEN WHEN 'PT' IS RUN FOR EITHER
04500	'OBOE1' OR 'OBOE2' YOU MAY TELL IT ALSO TO  USE  ALL  LINES  LABELLED
04600	'OBOEX'.
04700	
04800		IF REHEARSAL NUMBERS, WITH EITHER  CIRCLES  (P8=1)  OR  BOXES
04900	(P8=2), APPEAR IN THE SCORE THEY WILL APPEAR IN ALL THE PARTS.
05000	
05100		ALL WORDS ASSOCIATED WITH A GIVEN STAFF WILL  APPEAR  IN  THE
05200	PART  USING  THAT STAFF.  IF THE WORDS ARE TO APPEAR IN ALL THE PARTS
05300	EVEN THOUGH THEY ARE ON ONLY ONE STAFF (AS  WITH  TEMPO  INDICATIONS,
05400	ETC.)  100 MUST  BE  ADDED  TO  EACH  WORD'S SIZE FACTOR (P5).  (NOTE
05500	HOWEVER THAT SINCE THE PARTS ARE COMPLETELY  RESPACED  IT  IS  LIKELY
05600	THAT THE POSITIONS OF THE WORDS WILL HAVE TO BE EDITED.)
05700	
05800		BEFORE RUNNING 'PT' A SPECIAL INFORMATION FILE MUST BE SET UP
05900	USING THE SOS EDITOR.  EACH LINE WILL HAVE THE NAME OF THE FIRST FILE
06000	TO BE READ FOLLOWED BY A STRING OF NUMBERS.  THE NUMBERS INDICATE HOW
06100	MANY FILES ARE NEEDED FOR EACH COMPLETE SYSTEM IN THE FULL SCORE.  UP
06200	TO 30 NUMBERS MAY BE TYPED AFTER EACH FILE NAME.  MORE LINES  MAY  BE
06300	ADDED  BUT  EACH  LINE MUST BEGIN WITH THE APPROPRIATE FILE NAME. ALL
06400	THIS ASSUMES THAT THE FULL SCORE FILES WERE SET UP IN AN ALPHABETICAL
06500	(IN RE. TO THE 5TH LETTER OF EACH NAME) ORDER.
06600	
06700	EXAMPLE:  THE FULL SCORE (3 PGS.) HAS 3 SYSTEMS IN 3 FILES ON PAGE 1,
06800		  1 SYSTEM IN 4 FILES ON PG2. AND 2 SYSTEMS IN 4 FILES (2 FOR
06900		  EACH SYSTEM) ON PAGE 3.  THE NAMES OF THE SCORE  FILES  ARE
07000		  (PG.1)  SCR1A,  SCR1B,  SCR1C;  (PG.2) SCR2A, SCR2B, SCR2C,
07100		  SCR2D;  (PG.3) SCR3A, SCR3B, SCR3C, SCR3D.
07200	
07300		  THE SOS FILE THEN SHOULD CONTAIN:
07400		100  SCR1A  1 1 1  4  2 2
07500	
07600		  OR IT COULD BE (DOES THE SAME THING):
07700		100  SCR1A  1 1 1
07800		200  SCR2A  4
07900		300  SCR3A  2 2
08000	
08100	RUNNING 'PT':
08200	
08300		THE FIRST PROMPT FROM 'PT' IS 'TYPE FILE NAME'.  USUALLY  YOU
08400	SHOULD  TYPE THE NAME OF YOUR SOS FILE HERE.  (IF YOU TYPE ANY NUMBER
08500	AFTER THE FILE NAME AND A FEW SPACES IT  WILL  CAUSE  ALL  INSTRUMENT
08600	NAMES FOUND IN THE SCORE FILES TO BE LISTED ON THE SCREEN.)  THEN YOU
08700	MUST TYPE THE NAME GIVEN FOR THE DESIRED PART. IF MORE THAN ONE  NAME
08800	IS  NEEDED (SUCH AS 'OBOE1' AND 'OBOEX') FOLLOW THE NAME (USING UP AT
08900	LEAST 5 SPACES) BY ANY NUMBER. THIS NUMBER WILL CAUSE 'PT' TO ASK FOR
09000	AN ADDITIONAL NAME.  UP TO 4 DIFFERENT NAMES MAY BE GIVEN.
09100	
09200		THE  PROGRAM WILL THEN BEGIN READING THE FILES CONTAINING THE
09300	SCORE.  THE NUMBERS WHICH APPEAR  TELL  HOW  MUCH  OF  THE  AVAILABLE
09400	STORAGE SPACE IS BEING USED. (THE LIMIT IS 8000. IF 8000 IS  EXCEEDED
09500	YOU MUST USE MORE THAN ONE SOS FILE TO PROCESS THE SCORE.)
09600		WHEN ALL THE INPUT HAS BEEN PROCESSED 'PT' WILL ASK FOR STAFF
09700	SIZE AND TRANSPOSITION NUMBER.  THE DEFAULT VALUES (<CR>) HERE ARE .9
09800	AND 0. IF MORE THAN 10 LINES ARE TO BE ON EACH PAGE OF A PART SET THE
09900	STAFF  SIZE  TO  A SMALLER VALUE.  (E.G. .8) THE TRANSPOSITION NUMBER
10000	WILL BE THE STEPS ABOVE OR BELOW THE LEVEL GIVEN IN THE SCORE.    THE
10100	CURRENT  AVAILABLE  TRANSPOSITIONS ARE FOR Bb, 1; FOR A, 2; FOR G, 3;
10200	FOR F, 4;  FOR  Eb,  -2;  FOR  Bb  (BASS  CLAR.),  8.   NOTE  THAT  F
10300	TRANSPOSITIONS  (4)  MAY BE IN EITHER BASS OR TREBLE CLEF.  (THE CLEF
10400	WILL REMAIN THE SAME AS IN THE SCORE.)  THE  TRANSPOSITION  NUMBER  8
10500	(FOR  BASS CLAR.) HOWEVER WILL PRODUCE A PART ALL IN TREBLE CLEF EVEN
10600	THOUGH SOME OF THE NOTES USE BASS CLEF IN THE SCORE.
10700	
10800		NEXT 'PT' WILL PRINT OUT A STRING OF NUMBERS SHOWING HOW MANY
10900	MEASURES IT THINKS SHOULD BE ON EACH LINE. THE NUMBERS ARE GROUPED BY
11000	THREES SINCE THREE LINES OF MUSIC NORMALLY  WILL  BE  PUT  INTO  EACH
11100	OUTPUT FILE.  IF THE ARRANGEMENT AS GIVEN IS SATISFACTORY A <CR> WILL
11200	ALLOW CONTINUATION ON TO THE NEXT STEP.  IF YOU WANT  TO  CHANGE  THE
11300	LINE-MEASURE RELATIONSHIP IT MAY BE DONE IN TWO WAYS.  
11400		IF  TWO  NUMBERS ARE TYPED THE FIRST WILL BE THE TOTAL NUMBER
11500	OF LINES DESIRED AND THE SECOND WILL BE THE NUMBER OF MEASURES TO  BE
11600	FOUND ON THE LAST LINE.  'PT' WILL TRY TO ARRANGE THINGS THIS WAY BUT
11700	IF IT CANNOT IT WILL TYPE OUT "CAN'T DO IT."   THE SECOND POSSIBILITY
11800	IS TO TYPE EXACTLY HOW MANY MEASURES YOU WANT ON EACH LINE. (UP TO 36
11900	NUMBERS MAY BE GIVEN.)  PAGE ENDINGS ARE INDICATED BY ZEROES  IN  THE
12000	STRING OF NUMBERS.
12100	
12200	   THUS IF THERE ARE TO BE ONLY EIGHT LINES ON A PAGE (THE NORM IS 9) 
12300	   YOU MIGHT TYPE:  3 3 4   4 3 2   3 3 0    4 3 5   3 3 3   4
12400		THIS WILL GIVE 2 PAGES, ONE WITH 8 LINES AND ONE WITH 7.
12500	
12600		NEXT YOU WILL BE ASKED TO TYPE THE FIRST  OUTPUT  FILE  NAME.
12700	YOU  MUST!  GIVE A 5-LETTER NAME.  AS FILES ARE WRITTEN OUT 'PT' WILL
12800	CHANGE THE LAST LETTER OF THE NAME IN ALPHABETICAL ORDER.  IF YOU HAD
12900	GIVEN  PAGE  MARKS  (ZEROES  IN  THE NUMBER STRING ABOVE) YOU WILL BE
13000	ASKED FOR A NEW FILE  NAME  FOR  THE  BEGINNING  OF  EACH  NEW  PAGE.
13100	TYPICALLY  YOU MIGHT GIVE FOR A FLUTE PART 'FLT1A' AS THE FIRST NAME.
13200	'PT' WOULD WRITE OUT 'FLT1A', 'FLT1B' AND 'FLT1C' AND  THEN  ASK  FOR
13300	ANOTHER NAME FOR THE NEXT PAGE.  THEN YOU MIGHT GIVE 'FLT2A' AND 'PT'
13400	WOULD BEGIN PAGE 2 WITH THAT NAME.
13500	
13600		EACH  TIME  'PT'  IS  RUN  IT  WRITES A TEMPORARY FILE CALLED
13700	'PARTS.DMD'.  IF  YOU  WISH  TO  REPROCESS  THE  DATA  IN  REGARD  TO
13800	TRANSPOSITION,  STAFF  SIZE  OR  LINE ARRANGEMENT, RUN 'PT' AGAIN BUT
13900	ANSWER THE FIRST PROMPT (FOR FILE NAME)  WITH  'OLD'  OR  JUST  <CR>.
14000	THIS  WILL  CAUSE  THE  PROGRAM  TO  READ  BACK  'PARTS.DMD' AND MOVE
14100	DIRECTLY TO THE QUESTION REGARDING TRANSPOSITION AND STAFF SIZE.
14200		EACH TIME YOU RUN THE PROGRAM IN THE ORDINARY WAY 'PARTS.DMD'
14300	IS REWRITTEN. THIS FILE SHOULD BE DELETED WHEN IT HAS NO FURTHER USE.
14400	
14500	
14600	
14700	**********  JUST  ***********
14800	
14900		'JUST' [MSS,LCS] IS USED TO JUSTIFY FULL SCORE SYSTEMS  WHICH
15000	REQUIRE   MORE   THAN   ONE   FILE   PER   SYSTEM.    IT   SHOULD  BE
15100	SELF-EXPLANATORY.
16000	
16100	
16200	<<<<<<<<<< HOW TO RUN A PROOF ON THE 'XGP' >>>>>>>>>>>>>>>>
16300		THE  PROGRAM 'MP' WILL CREATE A FILE FOR THE XGP PROGRAM 'XM'
16400	OR FOR THE CALCOMP.  GENERALLY USE SIZE FACTOR = 1 FOR XGP PRINTING.
16500	
16600	THE FIRST PROMPT IN MP IS 'RESET BOTTOM?' THE ANSWER  SHOULD  USUALLY
16700	BE  <CR>  WHEN MP'S OUTPUT IS TO GO TO XM. 'P' WILL CAUSE ALL LETTERS
16800	NUMBERS TO PRINT WITH THE 'PRIMITIVE' FONT.  'A' WILL  RESET  TO  THE
16900	ORDINARY MODE IF A 'P' HAD BEEN GIVEN EARLIER.
17000	
17100		IF THE  AUTOMATIC  'MOVE-UP'  FEATURE  INVOLVING  P8  OF  THE
17200	PARAMETERS  FOR STAFF 0 IS USED (SEE PG.5) AND MORE THAN ONE SEPARATE
17300	FILE IS TO BE CREATED FOR PRINTING ON THE CALCOMP, THE ANSWER TO  THE
17400	FIRST  PROMPT  SHOULD BE 'N' FOR ALL RUNS AFTER THE LOWEST PORTION OF
17500	THE PAGE IS DONE.
17600	
17700		IF THE PAGE IS IN MORE THAN ONE SECTION ALWAYS START WITH THE
17800	BOTTOM  SECTION FIRST.  YOU WILL BE ASKED FOR FILE NAMES.  WHEN THERE
17900	ARE NO MORE TO BE GIVEN TYPE <CR>.   THE QUESTION, "MOVE UP AT  END?"
18000	SHOULD  BE ANSWERED BY Y, N OR WITH A NUMBER.  A NUMBER WILL INDICATE
18100	THE NUMBER OF INCHES TO MOVE FROM THE LEVEL OF STAFF 0 AT POSITION  0
18200	TO  STAFF  0,  POSITION 0 IN THE SUCCEEDING FILE.  'Y' WILL PLACE THE
18300	SUCCEEDING FILE'S LOWEST POINT ABOUT 1/2" ABOVE THE HIGHEST POINT  OF
18400	THE  FIRST  FILE.   'N'  IS USED TO WRITE FILES EXACTLY ON TOP OF ONE
18500	ANOTHER.
18600	
18700		IF THE FILE NAMES FORM A SERIES OF 5 LETTER NAMES ENDING WITH
18800	CONSECUTIVE  LETTERS  OF  THE  ALPHABET,  YOU  MAY TYPE THE LAST NAME
18900	FOLLOWED BY THE TOTAL NUMBER OF FILES THAT ARE TO BE PRINTED ON  THAT
19000	SINGLE  PAGE.   THE  FILES WILL BE FOUND IN THE PROPER SEQUENCE.  FOR
19100	EXAMPLE, 'TRC4D 4' WILL PRINT FILES TRC4D THROUGH TRC4A.
19200	
19300		(AN  ALTERNATIVE METHOD IS TO START WITH THE NAME ENDING WITH
19400	THE LOWEST LETTER OF THE ALPHABET AND FOLLOW IT WITH THE  NUMBER  99.
19500	USING  THE  ABOVE  EXAMPLE,  ONE WOULD TYPE 'TRC4A 99'.   THE PROGRAM
19600	WOULD THEN LOOK FOR THE 'TRC4' FILE ENDING WITH HIGHEST LETTER OF THE
19700	ALPHABET  -  I.E.   'TRC4D'  -  AND  BEGIN  BY  PROCESSING THAT FILE,
19800	CONTINUING BACKWARDS THROUGH THE ALPHABET.)
19900	
20000		IF  A SECOND NUMBER IS TYPED, THE FILES WILL BE EVENLY SPACED
20100	BY THAT NUMBER OF INCHES BETWEEN THE BOTTOM OF EACH  STAFF  0  --  AS
20200	DESCRIBED ABOVE.
20300	
20400	A SIZE FACTOR OF 1 CREATES THE CORRECT WIDTH FOR 8 1/2" PAPER.   TYPE
20500	A SECOND NUMBER(1) AFTER 'SIZE FACTOR' TO  HEAVIER  STAFF  LINES  AND
20600	LEDGER LINES.  (SOMETIMES NECESSARY WITH XGP.)
20700	
20800	WHEN THE PROGRAM HAS EXITED A FILE CALLED PLT.DMD HAS BEEN WRITTEN ON
20900	THE DSK.   THE DATA MAY NOW BE PRODUCED ON THE PLOTTER (BY USING  THE
21000	PLOT  PROGRAM,  P.DMP[MSS,LCS])  OR  ON  THE  XGP  (BY  USING THE XGP
21100	PROGRAM, XM.) (PLOT HAS NO PROMPTS AND XGP IS SELF-EXPLANATORY.)
21200	
21300	
21400	---- FOLLOWING ARE OLD PLOT COMMANDS ----
21500	'P' N1, N2, N3, N4, N5, N6 = PLOT DISPLAY
21600		 N1=WIDTH FAC., 
21700		 N2=HEIGHT FAC.
21800	         N3=1, PLOTS ONLY THIN LINES. N3=2, PLOTS ALL BUT THIN LINES.
21900		 N4=1  NO MOVE AT START 
22000		 N5=1  NO MOVE AT END.
22100		 N6= MOVE UP 'N' STAVES AT END.
     

00100	INDEX TO SUBROUTINES:
00200	
00300	    FILE NAME:
00400	
00500		FORTRAN PROGRAMS:
00600	
00700		MSS
00800		PLTSRT	SLUR
00900			PLTSRT
01000			BOX
01100			FORMAT
01200	
01300		HOMF4
01400	
01500		MOVER
01600	
01700		CLEFS
01800	
01900		GREDX   VLINE
02000			ASKIT
02100			GRED
02200			LPEN
02300			SAVIT
02400			LISTP
02500	
02600		RESTS	TAIL
02700			REST
02800			BREP
02900			FERMTA
03000			PNUM
03100	
03500		WORDS 	WORDS
03600			TYPE
03700			SETLET
03800			LNEND
03900			FILLMS
04000			PRESCN
04100	
04200		SCMSS	
04300	
04400		RHYTH	RHYTH
04500			SETUP
04600			MARKS
04700	
04800		NOTBMS	NOTES
04900	
05000		BEAMS	BEAMS
05100	
05200		PREFIL	FILLMS
05300			ROTATE
05400	
05900		FAIL PROGRAMS:
06000	
06100		LOOP	LOOP
06200			FINDIT
06300			PLACE
06400			DPYNEW
06500			MVBEAM
06600			MVBX
06700			JUGGLE
06800			XNOTE
06900			BAUTO
07000			SORT2
07100			UPDATE
07200			NEWR
07300			MSSLUP
07400			LUP2
07500			HOMER
07600			FSCAN
07700			NALF
07800	
07900		SLOOP	RNOTE
08000			DRWNT
08100			RDRAW
08200			SLOOP
08300			CIRCLE
08400			PSRT
08500			RUNTHR
08600	
08700		FILL	FILLER
08800			LINES
08900			EDIT
09000	
09100		MFAIL	RJBX
09200			CENTX
09300			EXTEN
09400			JDRAW
09500			CENTER
09600			LINX
09700			UNPACK
09800			ROFF
09900			NOZERO
10000			EXCH
10100			BMS
10200			IABS
10300			ABS
10400			RHORZ
10500			RTLINE
10600			FLOAT
10700			IFIX
10800	
10810		ALPH	ALPHA
10820			SPACER
10830	
10900		SCAN	SCANR
11000	
11100		NEW	BMSTF
11200	
11300		CODE4	ITMSUB
11400	
11500		KSIG	KSIG
11600	
11700		NTSB	NOTWRT
11800	
11900		NTS	NTS
12000			STAFF
12100	
12200		METER	METER
12300			MAKNUM
12400	
12500		MOVE	MOVIT
12600			GETPTS
12700			OUTLIM
12800			COPYIT
12900			UPDN
13000			STFCH
13100			DELETE
13200			NOIR (DUMMY)
13300			SLEND
13400			POSIT
13500	
13600		MSSIO	GETFI2
13700			FASTI2
13800			LOOK
13900			LOOKD
14000			LOOKF
14100			(PAC)
14200			(UNPAC)
14300	
14400	FILES FOR PLOTTER AND XGP OUTPUT.
14500	
14600		MPRNT
14700		PPSRT	SLUR
14800			PLTSRT
14900			CLEFS
15000	
15100		PLTIT	PLTCMD
15200			FILLMS
15300			ROTATE
15400	
15500		FILLXG	FILLER
15600			LINES
15800			(PLOTS)
15900			NOIR
15910	
15920		PLOT
     

00100	*******  SOME COMMAND FILES  (4/76) **********
00200	
00300	RAIDT.CMD --------		LOADS WITH UPPER SEGMENT
00400	
00500	%S MSS,MOVER,GREDX,WORDS,SCMSS,MSSIO,CLEFS,BEAMS
00600	,NOTBMS,RHYTH,HOMF4
00700	,RESTS,ALPHA,PLTSRT,TABL
00800	,%1< %1B NTS,LOOP,SLOOP,MFAIL,MOVE,FILL,CODE4,KSIG,SCAN
00900	,NTSB,NEW,SEGFIX,METER,CURSOR.REL[MSS,LCS],%LSYS:LIB40 %V
01000	
01100	
01200	
01300	RAIDM.CMD  ----  FOR PROGRAM 'MP'
01400	
01500	%S MPRNT,RESTS,ALPHA,PPSRT,CLEFS,PLTIT
01600	,PLOT,MSSIO,TABL
01700	, %1< %1B ,NEW,METER,NTSB,NTS,SEGFIX,CODE4
01800	,KSIG,SLOOP,MFAIL,FILLXG,%LSYS:LIB40 %V
01900	
01910	
01920	MSSM.CMD   -- NO RAID -- USE THIS TO SAVE ON SYS.
01930	
02000	MSS,MOVER,GREDX,WORDS,SCMSS,MSSIO,BEAMS
02010	,CLEFS,NOTBMS,RHYTH,HOMF4
02020	,RESTS,PLTSRT,EARLY
02030	,%1<  NTS,LOOP,SLOOP,MFAIL,MOVE,FILL,CODE4,KSIG,ALPH
02040	,SCAN,NTSB,NEW,SEGFIX,METER,CURSOR.REL[MSS,LCS],%LSYS:LIB40